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1. ABSTRACT 

THIS PROGRAM IS AN INTERACTIVE MULTI-DEVICE EXERCISER. 

THE PROGRAM OPERATES IN BACKGROUND-FOREGROUND MODE 
WITH PROCESSOR AND IN-LINE DEVICE TEST CODE AS THE 
BACKGROUND AND INTERRUPT DRIVEN DEVICE TEST CODE AS 
THE FOREGROUND. IN THIS MANNER, THE CENTRAL PROCESSOR 
MAY BE EXERCISED CONCURRENTLY WITH THE TEST OF ANY, OR 
ALL OF THE DEVICES THAT OPERATE IN THE INTERRUPT MODE. 

IF AN ERROR OCCURS IN ANY OF THE DEVICES THAT HAVE BEEN 
SELECTED FOR TESTING, IT IS RECOMMENDED THAT THE INDIVIDUAL 
DIAGNOSTIC FOR THE DEVICE THAT FAILED BE USED TO CORRECT THE 
MALFUNCTION. 

2. REQUIREMENTS 

2.1 EQUIPMENT 

PDP-11/10 OR 
PDP-1 1/20 OR 
PDP-11/40 OR 
PDP-11/45 PROCESSOR 
BKW OF MEMORY 


2,1.1 OPTIONAL HARDWARE THAT THE PROGRAM WILL EXERCISE 
OR INTERACT WITH 


AA1 1 
AD01 
AFC 11 
BM792YA 

BM792YB, MR 1 1-DB 

CDll 

CM1 1 

CR11 

DC11 

DM11 

DMU-BB 

DN11 

DPI 1 

DR11-A 

DRU-B 

DR11-C 


DIGITAL TO ANALOG CONVERTER WITH SCOPE 
ANALOG TO DIGITAL CONVERTER 
LOW LEVEL ANALOG MULTIPLEXER AND CONVERTER 
DIODE BOOT FOR PAPER TAPE 

DIODE BOOT FOR TC 1 1 , RC 1 1 , RF 1 1 , RK 1 1 AND RP11 

CARD READER 

CARD READER 

CARD READER 

ASYNCHRONOUS LINE UNIT 

ASYNCHRONOUS MULTIPLEXER 

MODEM CONTROL MULTIPLEXER 

digital dialer 

SYNCHRONOUS LINE UNIT 

DEVICE REGISTER INTERFACE (INTERRUPT ONLY) 
GENERAL DEVICE REGISTER INTERFACE (NPR) 
DEVICE REGISTER INTERFACE (INTERRUPT ONLY) 
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2,1.1 OPTIONAL HARDWARE CONTINUED 


Dill 
KE1 1 
KG1 1 
KLU 
KT1 1 
KWU-L 
KW11-P 
LP1 1 
MM1 1 
PC11 
RC1 1 
RF1 1 
RK1 1 
RPll 
TCI 1 
TM11 
UDC 1 1 


BUS SWITCH 

ARITHMETIC UNIT 

REDUNDANT CHECK OPTION 

ASR 33 OR 35 t VT05 , VT06 , LCl 1 ) 

MEMORY MANAGEMENT OPTION 
LINE CLOCK 
PROGRAMMABLE CLOCK 
LINE PRINTER 
UP TO 28KW QF MEMORY 
HIGH SPEED READER/PUNCH 
DISK 64KW 
DISK 256KW 

DISK (IBM TYPE 2315) 

DISK 

DECTAPE 

MAGNETIC TAPE - INDUSTRY COMPATIBLE 
UNIVERSAL DIGITAL CONTROLLER 



2.1.2 HARDWARE EXERCISED IF PRESENT (NOT SWITCH REGISTER INHIBITABLE) 

KE11-E EIS FOR PDP 11/40 

KE11-F FIS FOR PDP 11/40 

FPll FLOATING POINT PROCESSOR 

2.2 STORAGE 


2.2.1 PROGRAM STORAGE 

THE PROGRAM USES MEMORY LOCATIONS 000000-37450, 

IF MEMORY EXPANSION HAS BEEN SELECTED, THE PROGRAM 
WILL USE ALL AVAILABLE MEMORY UP TO 1000 BYTES (OCTAL) 

FROM THE END OF THE LAST AVAILABLE BANK, OR 1000 BYTES 
BELOW THE END OF 28K, WHICHEVER IS LESS. 

3, LOADING PROCEDURE 

3.1 METHOD 

PROCEDURE FOR NORMAL ABSOLUTE TAPES SHOULD BE FOLLOWED. 

4, STARTING PROCEDURE 

4.1 STARTING PROCEDURE FOR SINGLE PROCESSOR, SINGLE BUS SYSTEMS 


4.1.1 LOAD PROGRAM INTO MEMORY, 

NOTE! THE PROGRAM IS INITIALIZED WITH A SPECIFIC DEVICE REGISTER 
AND VECTOR ASSIGNMENT FOR FLOATING VECTOR DEVICES. 

TO ACCOMODATE OTHER CONFIGURATIONS, APPROPRIATE CHANGES 
SHOULD BE MADE IN THE "DEVICE REGISTER AND VECTOR 
TABLE" (SEE LISTING) AFTER THE PROGRAM HAS BEEN LOADED. 
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fj,1.2 SET SWITCH REGISTER TO STARTING ADDRESS 000200. 
PRESS LOAD ADDRESS. 

4.1.3 SET UP DEVICE INHIBIT SWITCHES AS DESCRIBED BELOW 


NOTE: IF THE SWITCH REGISTERsO , UPON INITIAL START, 

THE PROGRAM WILL PRQCEDE DIRECTLY TO 4.1.6, AND NO DEVICES 
WILL BE TESTED. 


NOTE! IF A NON-EXISTENT DEVICE IS SELECTED IN ANY OF 
THE THREE DEVICE INHIBIT SETTINGS, A BUS ERROR TRAP WILL 
OCCUR AND THE PROGRAM WILL HALT AT LOCATION 000006. 



AFTER STARTING ADDRESS HAS BEEN LOADED: 


SW00=1 INHIBIT 
SWO 1 * 1 INHIBIT 
SW02=1 INHIBIT 
SW03*1 INHIBIT 
SW04*1 INHIBIT 
SW05*1 INHIBIT 
SWQBs 1 INHIBIT 
SW07*1 INHIBIT 
SWO 8 = 1 INHIBIT 
SWO 9*1 INHIBIT 
SN 10*1 INHIBIT 
SW11*1 INHIBIT 
SW 1 2= 1 INHIBIT 
SW13*1 INHIBIT 
SW 1 4*1 INHIBIT 
SW15*1 INHIBIT 


DT11 BUS SWITCH SELECTION 
MULTI-PROCESSOR TESTING 
PC11 HSP 
PCU HSR 

KW11-L LINE CLOCK 
CPU CARD READER 

KW11-P PROGRAMMABLE REAL TIME CLOCK 

LP11 LINE PRINTER — IF LINE PRINTER IS USED, MUST RESTART AT 600 
SECTION ONE AND TWO OF THE BUS TESTER (FACTORY USE ONLY) 

SECTION THREE AND FOUR OF THE BUS TESTER (FACTORY USE ONLY) 

RFll DISK 
UDCU 
RCU DISK 
TC11 DECTAPE 
KL1 1 TTY OUTPUT 
KL1 1 TTY INPUT 


PRESS START. 


c 
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4.1.4 PROGRAM WILL HALT. 

SET UP DEVICE INHIBIT SWITCHES AS DESCRIBED BELOW 


AFTER FIRST HALT 

SW00*1 INHIBIT DC11 #1 .... VECTOR 300 

SWOlsl INHIBIT DC11 #2 .... VECTOR 310 

SW02*l INHIBIT AA1 1 DAC WITH SCOPE OPTION 
SW03*1 INHIBIT AFC11 ANALOG MULTIPLEXER 
SWO 4*1 INHIBIT RK11 DISK 

SW05*1 INHIBIT DR11-B GENERAL INTERFACE (NPR) 

SWOfesl INHIBIT KE1 1 EXTENDED ARITHMETIC ELEMENT 
SW07*1 INHIBIT AD01-D A/D CONVERTER 
SW08*1 INHIBIT RP11 DISK 

SW09*1 INHIBIT BUS LATENCY TESTER (FACTORY UES ONLY) 

SWlOsl INHIBIT DN11 DIGITAL DIALER 

SWlisl INHIBIT TM11 MAGNETIC TAPE 

SW12*1 INHIBIT M792YA (DIODE BOOT FOR PCll.KLll) 

SW13*1 INHIBIT M792YB.MRH-DB (RF, RC, RK AND TC11) BOOT 
SW 14*1 INHIBIT DPI 1 SYNCHRONOUS LINE UNIT — VECTOR 320 
SW15*1 INHIBIT DM11 ASYNCHRONOUS MULTIPLEXER — VECTOR 330 
PRESS CONTINUE, 



4,1.5 PROGRAM WILL HALT. 

SET UP DEVICE INHIBIT SWITCHES AS DESCRIBED BELOW 


AFTER SECOND HALT 

SWOOsl INHIBIT KG11-A REDUNDANCY CHECK OPTION 
SWO 1*1 INHIBIT CD11 CARD READER 

SW02*1 INHIBIT DRll-A, DR11-C GNENERAL INTERFACE (INTERRUPT ONLY) 

SWO 3*1 INHIBIT DM11-BB MODEM CONTROL MULTIPLEXER 

SW04*1 INHIBIT VR20 2 COLOR SCOPE OPTION 

SW05*1 INHIBIT Kill MEMORY MANAGEMENT OPTION 

SW06*1 INHIBIT RESERVED 

SW07*1 INHIBIT RESERVED 

SW08*1 INHIBIT RESERVED 

SW09*1 INHIBIT RESERVED 

SW 1 0*1 INHIBIT RESERVED 

SWi 1*1 INHIBIT RESERVED 

SW12*1 INHIBIT RESERVED 

SW13*1 INHIBIT RESERVED 

SWI 4*1 INHIBIT RESERVED 

SW15*1 INHIBIT RESERVED 



PRESS CONTINUE 
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4.1.6 PROGRAM WILL HALT. 

SET SWITCHES AS DESCRIBED IN SECTION 5.1.2. 

WORST CASE IS ALL SWITCHES DOWN. 

PRESS CONTINUE. 

4.1.7 THE PROGRAM WILL BEGIN TEST EXECUTION. 

NOTE! A MINIMUM OF TWO PASSES SHOULD BE RUN. 

4,2 STARTING PROCEDURE FOR SYSTEMS WITH BUS SWITCH 

4.2.1 PUT BUS SWITCH INTO MANUAL MODE AND CONNECT TO PROCESSOR 
INTO WHICH PROGRAM IS TO BE LOADED. 

4.2.2 LOAD PROGRAM INTO MEMORY 

4.2.3 SET SWITCH REGISTER TO STARTING ADDRESS 000200 
PRESS LOAD ADDRESS 

4.2.4 SELECT DEVICES AS DESCRIBED IN 4.1.3 TO 4.1.5, WITH 
THE FOLLOWING EXCEPTIONS. 

AFTER THE STARTING ADDRESS HAS BEEN LOADED, SWOO 

MUST BE SET TO 0 TO PERMIT BUS SWITCH SELECTION BY THE PROGRAM. 

AFTER THE FIRST HALT, SW01 MUST BE SET TO 0 IF THE 
PROGRAM IS TO BE RUN IN MULTI-PROCESSOR MODE. 

4.2.5 AFTER DEVICE SELECTION HAS BEEN ACCOMPLISHED, 

SWITCH THE BUS SWITCH TO THE OTHER PROCESSOR AND REPEAT 

4.2.2 TO 4,2.4 FOR THE OTHER PROCESSOR 

4.2.6 PLACE BUS SWITCH IN PROGRAMMABLE MODE. 

4.2.7 PERFORM 4.1.6 FOR EACH PROCESSOR 
PROGRAM WILL BEGIN TEST EXECUTION 


4,3 STARTING PROCEDURE WITH OVERLAY 

4.3.1 LOAD GTP 

4.3.2 LOAD OVERLAY 

NOTE! IF MEMORY EXPANSION IS TO BE RUN, THE OVERLAY 
MUST BE LOADED INTO MEMORY STARTING AT 
LOCATION 40000 (OCTAL) 
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4.3.3 LOAD GTP STARTING ADDRESS 

4.3.4 SELECT DEVICES AS DESCRIBED IN 4.1.3 TO 4.1,5 


NOTES IF THE OVERLAY HAS AN INITIALIZATION SECTION, PROGRAM 
CONTROL WILL BE TRANSFERED TO THE OVERLAY WHEN CONTINUE 
IS PRESSED. THE APPROPRIATE ACTION MAY NOW BE TAKEN 
TO INPUT ANY INFORMATION TO THE OVERLAY THAT IS 
REQUIRED, THE INITIALIZATION CODE WILL RETURN CONTROL 
TO GTP AT LOCATION "RUNSW" FOR SETUP OF OPERATIONAL 
SWITCHES. 


4.3.5 PERFORM 4.1,6 

PROGRAM WILL BEGIN TEST EXECUTION 


5. OPERATING PROCEDURE 


5.1 SWITCH REGISTER OPTIONS 


SW15*i UP— HALT ON ERROR 

SW14*1 UP— SCOPE LOOP - PROCESSOR TEST 

SW13*1 UP— INHIBIT PRINT OUT 

SW12 = 1 UP— FREEZE PROCESSOR IN CURRENT MODE 

SW 1 1*1 UP— INHIBIT SUB-PROBLEM ITERATION 

SW 10*1 UP— INHIBIT PROCESSOR TEST 

SW09*1 UP— INHIBIT MEMORY EXPANSION 

SW06*1 UP— ISOLATION— BY DROPOUT 

SW07sl UP— SWITCH ERROR MESSAGES TO HIGH SPEED PUNCH 

SW06 = 1 UP— RESTART PROGRAM ON ERROR 

S W 0 5 = 1 UP— RESERVED 

SW04* 1 UP— RESERVED 

5W03sl UP— RESERVED 

SW02*1 UP— RESERVED FOR OVERLAYS 

SW01*1 UP— RESERVED FOR OVERLAYS 

swoo=i up— reserved for overlays 
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5.2 OPERATING PROCEDURE FOR SINGLE PROCESSOR SINGLE BUS SYSTEMS 

5,2.1 NORMAL OPERATION-ALL SWITCHES DOWN 

WITH ALL SWITCHES DOWN, THE PROGRAM WILL INITIALIZE ALL 
SELECTED DEVICES AND THEN BEGIN EXECUTION OF PROCESSOR 
TEST CODE. AFTER ALL PROCESSOR AND IN-LINE DEVICE 
TEST CODE HAS BEEN RUN, THE PROGRAM WILL CHECK THE DEVICE 
WATCHDOGS TO VERIFY THAT SELECTED DEVICES HAVE INTERRUPTED 
AT LEAST ONCE DURING THE CURRENT PASS, THE PROGRAM WILL 
BEGIN EXECUTION OF THE MEMORY EXPANSION TEST (IF MORE 
THAN 8KW OF MEMORY IS AVAILABLE). AFTER THE MEMORY 
EXPANSION TEST IS COMPLETED, THE PROGRAM WILL TYPE AN 
ASTERISK AND RESTART THE PROCESSOR TEST. 

IF AN ERROR OCCURS, THE PROGRAM WILL OUTPUT AN ERROR 
MESSAGE TO THE TELEPRINTER AND CONTINUE TESTING. 

ON ALTERNATE PASSES, THE PROCESSOR 'T* BIT WILL BE SET 

CAUSING A TRACE TRAP TO OCCUR FOLLOWING 

THE EXECUTION OF EVERY PROCESSOR TEST INSTRUCTION. 

IF THE PROCESSER UNDER TEST IS A PDP-11/45 THEN 
THE FOLLOWING SEQUENCE OF PASSES WILL BE EXECUTED; 

PASS 0,14, ETC KERNEL MODE , R0-R5 , NO 'T» TRAP 
PASS 1,15, ETC KERNEL MODE , R0-R5 , • T ' TRAP 
PASS 2, 16, ETC KERNEL MODE , R 1 0-R 1 5 , NO • T « TRAP 
PASS 3, 17, ETC KERNEL MODE ,R1 0-R 15 , • T ' TRAP 
PASS 4, 20, ETC SUPERVISOR MODE , RO-R5 , NO • T » TRAP 
PASS 5, 21, ETC SUPERVISOR MODE , RO-RS , » T ' TRAP 
PASS 6, 22, ETC SUPERVISOR MODE, R10-R15 , NO »T» TRAP 
PASS 7, 23, ETC SUPERVISOR MODE, R10-R15, • T ' TRAP 
PASS 10, 24, ETC USER MODE, R0-R5 , NO 'T' TRAP . 

PASS 11, 25, ETC USER MODE, R0-R5 , • T • TRAP 
PASS 12, 2b, ETC USER MUDE,R10-R15,NO »T* TRAP 
PASS 13, 27, ETC USER MODE, Rl 0-R IS , ' T ' TRAP 

IF THE KTll OPTION IS AVAILABLE AND NOT INHIBITED, ALL 
PASSES (EXCEPT 0 AND 1) ARE RUN WITH THE KTll ENABLED (WITH 
VIRTUAL ADDRESSES MAPPED EQUAL TO PHYSICAL ADDRESSES). 

NOTE; THE PASS COUNT CAN BE FOUND IN LOCATION "PASCNT". 

IF THE PROCESSOR IS A PDP-1 1/45, THE PASS COUNT WILL BE 
DISPLAYED IN THE PROCESSOR DISPLAY REGISTER. 
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5.2.1 NORMAL OPERATION CONTINUED 

NOTE t IF A POWER FAILURE OCCURS , AN ERROR MESSAGE WILL BE 
TYPED IN THE STANDARD FORMAT AFTER POWER UP OCCURS, 

THE PROGRAM WILL THEN BEGIN EXECUTION OF PROCESSOR TEST 
AND WILL COMPLETE THE PROCESSOR TEST BEFORE RE-INITIALIZING 
SELECTED DEVICES. THIS DELAY IS NECESSARY TO 
ALLOW MECHANICAL DEVICES TO RECOVER FROM THE POWER FAILURE, 

NOTE) THE PROCESSOR STACK POINTER WILL BE SET TO LOCATION 
"STACK" EACH TIME THAT THE PROCESSOR TEST IS STARTED, 

AT THE END OF EACH PASS, THE PROCESSOR STACK POINTER WILL 
BE SET TO LOCATION "STACKK". IF THE PROCESSOR 
(PDP-11/45) IS OPERATING IN OTHER THAN KERNEL MODE 
THE CURRENT MODE STACK POINTER WILL BE INITIALIZED TO "STACK" 
AND THE KERNEL STACK POINTER WILL BE SET TO "STACKK", 

5.2.2 WITH SWITCH 15*1 

THE PROGRAM WILL OPERATE AS DESCRIBED IN 5.2,1, EXCEPT THAT 
IF AN ERROR OCCURS, THE PROGRAM WILL HALT AFTER TYPEOUT. 

NOTES IF THIS OPTION IS USED, FURTHER ERRORS MAY OCCUR 
IF THE PROGRAM IS CONTINUED FROM THE HALT. THESE 
ERRORS MAY NOT BE DUE TO DEVICE FAILURES, BUT MAY BE 
CAUSED BY UNSATISFIED INTERRUPT AND NPR REQUESTS THAT 
WERE PENDING AT THE TIME OF THE HALT, 

5.2.3 WITH SWITCH 15*1, AnD SWITCH 6*1 

THE PROGRAM WILL PERFORM AS DESCRIBED IN 5.2.2, EXCEPT 
THAT ALL DEVICES THAT HAVE BEEN SELECTED WILL BE RE- 
INITIALIZED, AND PROCESSOR TEST WILL BE RESTARTED. 

5.2.4 WITH SWITCH 12*1 

THE PROGRAM WILL PERFORM AS DESCRIBED IN 5.2.1, EXCEPT 
THAT THE CURRENT PROCESSOR MODE WILL BE FROZEN, I.E., 

IF THE ' T ' BIT IS SET, IT WILL REMAIN SET, 

IF IT IS CLEARED, IT WILL STAY CLEARED, ETC. 

NOTE* IF THE PROCESSOR IS A PDP-11/45, THE MODE In PROGRESS 
AT THE TIME THAT SWITCH 12 IS SET TO 1 WILL BE CONTINUOUSLY 
EXECUTED. 
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5.2.5 MTH SWITCH 11*1 

THE PROGRAM WILL PERFORM AS DESCRIBED IN 5.2.1, EXCEPT THAT 
EACH SUB-LOOP OF PROCESSOR TEST WILL BE EXECUTED ONLY 
ONCE PER PASS, AND THE DEVICE WATCHDOGS WILL NOT 
BE CHECKED. 

5.2.6 WITH SWITCH 10*1 

NO PROCESSOR TEST CODE WILL BE EXECUTED, AND 
NO END OF PASS INDICATION WILL BE GIVEN. 

ERROR MESSAGES WILL OCCUR IN THE NORMAL MANNER. 

5.2.7 WITH SWITCH 9*1 

THE PROGRAM WILL PERFORM AS DESCRIBED IN 5.2.1, EXCEPT THAT 
THE MEMORY EXPANSION TEST WILL NOT BE EXECUTED, 

5.2.8 WITH SWITCH 8*1 

THE PROGRAM WILL PERFORM AS DESCRIBED IN 5.2.1, EXCEPT 
THAT AT THE END OF A PASS, OR IF AN ERROR OCCURS 
THE PROGRAM WIL DELETE ONE OF THE DEVICES THAT HAS 
BEEN SELECTED FOP TESTING. ON EVERY SUBSEQUENT ENTRY 
INTO THE ROUTINE, THE PREVIOUSLY DELETED DEVICE WILL BE 
RESTORED, AND A NEW DEVICE WILL BE DELETED. 

THE PROGRAM WILL THEN RE-INTIALIZE ALL SELECTED DEVICES 
AND PROCESSOR TEST EXECUTION WILL BE RESTARTED. 

5.2.9 WITH SWITCH 7*1 

THE PROGRAM WILL PERFORM AS DESCRIBED IN 5.2.1, EXCEPT THAT 
ALL ERROR MESSAGES, AND THE END OF PASS ASTERISK WILL BE 
TRANSMITTED TO THE HIGH SPEED PUNCH INSTEAD OF THE TELETYPE. 

5.2.10 WITH SWITCH 6*1 

THE PROGRAM WILL PERFORM AS DESCRIBE IN 5.2.1, EXCEPT THAT 
IF AN ERROR OCCURS, ALL SELECTED DEVICES WILL BE RE- 
INITIALIZED, AND PROCESSOR TEST WILL BE RESTARTED. 


5.3 OPERATING PROCEDURE FOR SYSTEMS WITH BUS SWITCH 

5.3.1 NORMAL OPERPATIQN-ALL SWITCHES DOWN 

THE PROGRAM WILL PERFORM AS DESCRIBED IN 5.2.1, EXCEPT THAT 
AT THE END OF EVERY PASS, THE BUS SWITCH WILL BE RELEASED 
BY THE PROCESSOR THAT IT IS CONNECTED TO 
AND THE OTHER PROCESSOR WILL ASSUME CONTROL. 



PAGE 11 


M 


5.3,2 SWITCH REGISTER OPTIONS 

THE SWITCH REGISTER OPTIONS FUNCTION THE SAME AS FOR A SINGLE 
PROCESSOR WITH THE EXCEPTION THAT SW6*i (RESTART ON ERROR) 

WILL CAUSE THE BUS SWITCH TO BE DISCONNECTED, AND THE 
OTHER PROCESSOR WILL BE CONNECTED, 

5,4 OPERATION WITH OVERLAY LOADED 

5.4.1 BACKGROUND OVERLAY 

IF A BACKGROUND OVERLAY HAS BEEN LOADED, THE PROGRAM 
WILL PERFORM AS DESCRIBED IN SECTION 5.2, EXCEPT THAT 
AT THE END OF EACH PASS (BEFORE THE ASTERISK), GTP WILL 
TRANSFER CONTROL TO THE OVERLAY. WHEN ALL OVERLAY 
CODE HAS BEEN EXECUTED, CONTROL WILL BE TRANSFERED 
BACK TO GTP, AND THE END OF PASS ASTERISK WILL BE TYPED. 

5.4.2 FOREGROUND OVERLAY 

PROGRAM OPERATION WILL BE AS DESCRIBED IN SECTION 5.2. 

6. ERRORS 

6.1 ERROR PRINTOUT 

THE FORMAT FOR ALL ERROR PRINTOUTS IS SEVEN COLUMNS OF DATA 
THE SIGNIFICANCE OF EACH COLUMN IS DESCRIBED BELOW 

COLUMN 1- PC+2 OF THE TEST THAT FAILED 

COLUMN 2- PROCESSOR STATUS AT THE TIME OF FAILURE 

COLUMN 3- PROCESSOR TEST IN PROGRESS AT THE TIME OF FAILURE 

COLUMN 4- STACK OFFSET 

COLUMN 5- FIRST DEVICE SELECTION (SRI) REGISTER 
COLUMN 6- SECOND DEVICE SELECTION (SR2) REGISTER 
COLUMN 7- THIRD DEVICE SELECTION (5R3) REGISTER 

6.2 ERROR RECOVERY 

FOR TTY READER AND HSR, TAPE MUST BE REPOSITIONED TO 
LEADER BEFORE RESTARTING TEST. 
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7. RESTRICTIONS 

7.1 STARTING RESTRICTION 

IF LINE PRINTER IS USED RESTART ADDRESS MUST BE 400 
FOR HSR AND TTY READER, TAPE MUST BE ON LEADER. FOR 
MAGNETIC TAPE, UNIT ZERO MUST BE SELECTED. FOR DECTAPE, 

UNIT ONE MUST BE SELECTED. 

7.2 OPERATIONAL RESTRICTION 

IF THE TELEPRINTER (AND/OR TELETYPE PUNCH) IS BEING 

USED FOR ERROR MESSAGE OUTPUT, THE READER PUNCH COMBINATION 

CANNOT BE TESTED UNLESS THE INPUT TO THE READER 

IS A BINARY COUNT TAPE THAT IS INDEPENDENT OF THE PUNCH 

OUTPUT. 

IF THE HIGH SPEED PUNCH IS BEING USED FOR ERROR MESSAGE 
OUTPUT, THE READER-PUNCH COMBINATION CANNOT BE TESTED 
UNLESS THE INPUT TO THE READER IS A BINARY COUNT TAPE 
THAT IS INDEPENDENT OF THE PUNCH OUTPUT. 

IF ISOLATION BY DROPOUT IS TO BE USED, THE INPUT TO 
THE TELEPRINTER (HIGH SPEED) READER MUST BE INDEPENDENT 
OF THE OUTPUT FROM THE TELETYPE (HIGH SPEED) PUNCH 
SINCE THESE DEVICES ARE TREATED AS INDEPENDENT BY 
THE ISOLATION ROUTINE. 

8. TROUBLESHOOTING USING GTP 

8.1 TRACKING DOWN UNUSUAL FAILURES 

IF A FAILURE OCCURS THAT IS NOT IMMEDIATE OBVIOUS, THE 
FOLLOWING SET OF CHECKPOINTS IS PROVIDED AS AN AID TO 
TROUBLESHOOTING, 

8.1.1 CAN THE FAILURE BE ISOLATED TO THE DEVICE 
THAT FAILS BY SELECTING ONLY THAT DEVICE. 


00 

• 

*-* 

• 

to 

IS 

THE PROBLEM 


A) 

A 

DEVICE 

FAILURE 


B) 

A 

UNIBUS 

NOISE PROBLEM 


C) 

A 

SYSTEM 

CONFIGURATION PROBLEM 
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8.1.3 DOES THE FAILURE OCCUR IF PROCESSOR TEST IS INHIBITED 

8.1.4 DOES THE FAILURE OCCUR IF PROCESSOR TEST IS ENABLED 

BUT CORE EXPANSION IS INHIBITED 

8.1.5 DOES THE FAILURE OCCUR CONSISTENTLY 

8.1.6 DOES THE FAILURE OCCUR CONSISTENTLY IN ONE PROCESSOR SUBTEST 

8.1.7 IS THE PROBLEM AN NPP LATENCY ERROR, If SO 

A) IS BUS POSITION CORRECT 

B) IS A NO SACK TIMEOUT QCCURING 

8.1.8 IS THE PROBLEM A BR LATENCY PROBLEM, IF SO 

A) IS THE POSITION ON THE BUS CORRECT 

B) ARE DEVICES AT THEIR STANDARD 6R LEVEL, IF NOT 

1) HAS GTP BEEN MODIFIED TO ACCOUNT FOR THIS FACT 

2) THE DEVICES MAY HAVE TO BE RECONFIGURED TO STANDARD 
LEVELS FOR GTP TO RUN 

8.1.9 IF THE PROGRAM COMES TO A HALT AT LOCATION 6, A BUS 
ERROR TIMEOUT HAS OCCURED. IF THIS HAPPENS 

A) WHERE WAS THE PROGRAM WHEN THE TRAP OCCURED 

B) WHICH DEVICE DID NOT RAISE SLAVE SYNC 

8.1.10 IF THE PROGRAM COMES TO A HALT AT LOCATION 12, AN 
ILLEGAL INSTRUCTION TRAP HAS OCCURED. IF THIS HAPPENS 

A) WAS THE PROGRAM MODIFIED 

B) IS THE PROCESSOR KNOWN TO BE GOOD 

C) ARE THE MEMORIES KNOWN TO BE GOOD 

8.1.11 IF THE PROCESSOR IS HUNG 

A) WHAT DEVICE, IF ANY, IS BUS MASTER 

B) WHAT IS THE STATE OF THE C LINES 

C) WHAT BPS AND NPRS ARE PENDING 

D) WHAT GRANTS ARE PENDING 

E) WHAT WAS THE PROCESSOR DOING WHEN THE HANG OCCURED 

F) DID THE PROCESSOR, OR A DEVICE, CAUSE THE BUS TO HANG 

8.1.12 IF A "NON-EXISTENT MEMORY" ERROR OCCURS FOR AN NPR DEVICE 

A) WHAT IS THE ADDRESS (ALL lb BITS) IN THE DEVICE BUS 
ADDRESS REGISTER 

B) IS THE ADDRESS VALID 

C) DOES THE OFFSET OF THE DEVICE BUS ADDRESS 
REGISTER FROM THE START OF THE MEMORY BUFFER 

AND THE COUNT IN DEVICE WORD COUNT REGISTER AGREE 

D) IS THE DEVICE TIMEOUT TOO SHORT 
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8.1.13 ARE THERE MORE THAN 20 UNIT LOADS ON THE UNIBUS 
WITHOUT A BUS BUFFER 

8.1.14 IS THERE MORE THAN 50 FEET OF UNIBUS CABLE 

8.1.15 IS THE UNIBUS TERMINATED CORRECTLY 

8.1.16 IF A POWER FAILURE OCCURES 

A) IS ANY POWER SUPPLY OVERLOADED 

B) WHAT IS THE LINE VOLTAGE 

C) DOES THE SYSTEM RECOVER PROPERLY 

8.1.17 IF A DEVICE FAILURE, OR PROCESSOR FAILURE OCCURS 

A) DO ALL DEVICE AND PROCESSOR DIAGNOSTICS RUN WITHOUT 
ERROR 

B) HAVE ALL DIAGNOSTICS BEEN RUN BEFORE GTP 

8.1.18 IF THE SIZE OF THE SYSTEM IS REDUCED BY REMOVING DEVICES 
FROM THE BUS, OR SHORTENING THE LENGTH OF BUS CABLE 

A) DOES THE DEVICE IN QUESTION STILL FAIL 

B) DOES IT FAIL THE SAME WAY 

C) HOW SMALL DOES THE SYSTEM HAVE TO BE MADE BEFORE 
THE SYSTEM FUNCTIONS CORRECTLY 

8.2 GTP TROUBLESHOOTING FEATURES 

SECTION 8.1 GIVES A LIST OF HARDWARE CHECKPOINTS THAT 
CAN BE USED TO ISOLATE SYSTEM HARDWARE FAILURES. THIS 
SECTION DESCRIBES THE FEATURES IN GTP THAT CAN BE USED 
AS AN AID TO TROUBLE SHOOTING. 

8.2.1 LOCATIONS OF INTEREST IN GTP 

8. 2. 1.1 RETURN 

THIS LOCATION CONTAINS THE STARTING ADDRESS OF THE 
PROCESSOR, OR IN-LINE DEVICE TEST CURRENTLY IN PROGRESS. 

8. 2. 1.2 ICOUNT 

THIS LOCATION CONTAINS THE NUMBER OF TIMES THAT THE 
CURRENT PROCESSOR, OP IN-LINE DEVICE TEST WILL BE EXECUTED 
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8. 2. 1.3 SCOPEF 

THIS LOCATION CONTAINS THE NUMBER OF TIMES THAT A 
PARTICULAR SUBTEST HAS BEEN EXECUTED. 

8.2. 1.4 PASCNT 

THIS LOCATION CONTAINS THE NUMBER OF PASSES THAT THE 
PROGRAM HAS EXECUTED 

8.2. 1.5 REGISTER 6 

THIS REGISTER CONTAINS THE PROCESSOR STACK POINTER. 

WHEN ANT PROCESSOR TEST IS ENTERED# THIS REGISTER 
SHOULD CONTAIN THE VALUE "STACK" 

8.3 MODIFYING GTP FOR TROUBLESHOOTING 

8.3.1 IN ORDER TO OBTAIN TIGHTER LOOPS ON A PROCESSOR 
SUBTEST# CHANGE THE "SCOPE" INSTRUCTION AT 

THE END OF THE SUBTEST TO A BRANCH TO THE FIRST 
INSTRUCTION OF THAT SUBTEST. 

8.3.2 IN ORDER TO DETERMINE THE CONTENTS OF A DEVICE STATUS 
REGISTER WHEN A FAILURE OCCURS, REPLACE THE CALL 

TO THE GTP ERROR ROUTINE, "HLT", WITH HALT (OP CODE 000000) 
THE CONTENTS OF THE DEVICE REGISTER MAY NOW 
BE EXAMINED, 

8.3.3 THE CONTENTS OF UP TO THREE (3) DEVICE REGISTERS MAY BE 
TYPED BY THE GTP ERROR HANDLER, AFTER AN ERROR HAS OCCURED. 
THIS MAY BE ACCOMPLISHED BY CHANGING THE LITERALCS) 

LOCATED AT PREGl+2(PREG2+2,PREG3+2) TO THE ADDRESS (ES) 

OF THE DEVICE REGISTER (S) TO BE TYPED (SEE LISTING). 

WHEN AN ERROR OCCURS, THE CONTENTS OF THE SELECTED DEVICE 
REGISTER(S) WILL BE TYPED IN CQLUMN(S) 5(6,7) 

OF THE ERROR TYPEOUT, INSTEAD OF THE CONTENTS OF THE DEVICE 
SELECTION REGISTERS. 

NOTE* IF THE CONTENTS OF A REGISTER IS TYPED AS DESCRIBED IN 

8.3.3, CARE SHOULD BE TAKEN WHEN INTERPRETING THE CONTENTS 
SINCE THE ERROR ROUTINE WILL NOT READ THAT REGISTER UNTIL 
SEVERAL SECONDS AFTER THE ERROR HAS OCCURED. 
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9. WHITING OVERLAYS FOR GTP 

GTP HAS THE FACILITY TO INTERFACE WITH A USER OVERLAY 
FOR TESTING ANY DEVICE NOT INCLUDED IN GTP. 

THE OVERLAY MAY BE EITHER A NON-INTERRUPTING BACKGROUND 
TEST (SUCH AS A SPECIAL PROCESSOR TEST, OR A TEST OF 
A NON-INTERRUPTING DEVICE SUCH AS A KE11 EXTENDED 
ARITHMETIC UNIT) OP A TEST FOR AN INTERRUPT-DRIVEN 
DEVICE THAT IS TO BE RUN CONCURRENTLY WITH DEVICES 
ALREADY INCLUDED IN GTP. 

NOTES THE USER SHOULD REFERENCE THE LISTING OF GTP FOR 
EXAMPLES OF TEST CODE THAT IS COMPATIBLE WITH GTP. 

9.1 OVERLAY LINKING 

9.1.1 BACKGROUND OVERLAY 

A BACKGROUND OVERLAY IS CALLED BY GTP USING THE 

"IOT" INSTRUCTION. THEREFORE, THE USER MUST TERMINATE 

HIS OVERLAY WITH AN "RTI " INSTRUCTION TO RETURN TO GTP. 

LOCATION 000020 MUST BE SET UP BY THE OVERLAY AT 
PROGRAM LOAD TIME WITH THE POINTER TO THE FIRST 
EXECUTABLE INSTRUCTION IN THE OVERLAY. 

9.1.2 OVERLAY INITIALIZATION (FOR EITHER BACKGROUND OR 
FOREGROUND OVERLAYS) 

IF THE USER REQUIRES INPUTS TO HIS OVERLAY FROM EITHER 
THE PROCESSOR CONSOLE SWITCHES, OR THE TELETYPE 
HE MUST PROVIDE A ROUTINE TO PERFORM THIS FUNCTION. 

THIS ROUTINE IS CALLED BY GTP WITH THE INSTRUCTION 
"JSR %7,SGETSW«, AFTER THE DEVICE INHIBIT SWITCHES HAVE 
BEEN SET (SEE SECTION 4.3.4 FOR DETAILS OF SELECTION) 

THE USER MUST SET UP LOCATION 001020 WITH A POINTER 
TO HIS OVERLAY INITIALIZATION ROUTINE AT 
OVERLAY LOAD TIME. 

THE ROUTINE MUST BE TERMINATED WITH AN "RTS %7" 

TO RETURN CONTROL TO GTP AFTER OVERLAY INITIALIZATION HAS 
BEEN COMPLETED. 
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9.1.2 DEVICE PRIMING CODE 

IF THE OVERLAY IS A TEST OF AN INTERRUPT DRIVEN DEVICE 
THAT IS TO RUN CONCURRENTLY WITH OTHER SELECTED DEVICES 
THE DEVICE MUST BE INITIALIZED# OR "PRIMED", 1MMEDIATLY 
AFTER ALL OTHER SELECTED DEVICES HAVE BEEN "PRIMED" BY GTP . 

THE USER PRIMING CODE IS CALLED BY GTP WITH "JSR %7,»PRIME" 
IMMED1ATLY AFTER ALL INTERNAL PRIMING CUDE HAS BEEN EXECUTED. 

THE OVERLAY MUST SET UP LOCATION 001022 WITH A POINTER 
TO THE USER PRIMING CODE AT OVERLAY LOAD TIME. 

THE PRIMING CODE MUST BE TERMINATED WITH AN "RTS %7" 

TO RETURN CONTROL TO GTP. 

9.2 SCOPE LOOPS 

IT IS SUGGESTED THAT THE OVERLAY USE THE INTERNAL 
SCOPE AND ITERATION LOOP ROUTINE, THIS ROUTINE IS 
CALLED BY A "TRAP" INSTRUCTION. 

9.3 ERRORS 

IT IS SUGGESTED THAT THE OVERLAY USE THE ERROR HANDLER 
INTERNAL TO GTP FOR ERROR REPORTING, UNLESS DETAILED 
ERROR INFORMATION IS REQUIRED. 

THIS ROUTINE IS CALLED BY AN "EMT" INSTRUCTION. 

9.4 RESTRICTIONS 

9,4.1 THE ONLY LOCATIONS AVAILABLE TO THE USER OVERLAY IN 

THE FIRST 8KW OF MEMORY (000000-037777) ARE 


000020 

170-174 

270-274 

300-776 

001020 

001022 


LINK TO USER BACKGROUND OVERLAY 

USER VECTORS 

USER VECTORS 

FLOATING DEVICE VECTORS 

LINK TO USER OVERLAY INITIALIZATION ROUTINE 
LINK TO USER DEVICE PRIMING CODE 


9,4.2 THE FOLLOWING INSTRUCTIONS MUST NOT BE USED 

RESET, WAIT, IOT, BR JMP 3 (TRACE TRAP) 
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9.4.3 LIMITED USE INSTRUCTIONS 

HALT-MAY BE USED ONLY IN OVERLAY INITIALIZATION ROUTINE 
EMT-MAY BE USED ONLY AS CALL TO GTP ERROR HANDLER 

TRAP-MAY BE USED ONLY AS CALL TO GTP SCOPE LOOP AND ITERATION HANDLER 

9.4.4 THE PROCESSOR STACK POINTER (R6) MUST NOT BE MODIFIED 

9.4.5 IF THE GENERAL REGISTERS (R0-R5) ARE USED BY A DEVICE 

INTERRUPT SERVICE ROUTINE* THEIR CONTENTS MUST BE SAVED 
IMMEDIATLY UPON ENTRANCE TO THE ROUTINE AND RESTORED 
IMMEDIATLY BEFORE EXITING THE ROUTINE. 

9.4.6 ALL DEVICE INTERRUPT SERVICE ROUTINES SHOULD BE SERVICED 
AT THE DEVICE HARDWARE INTERRUPT LEVEL. 

9.4.7 ONLY BITS 0-3 AND 5-8 OF THE PROCESSOR STATUS WORD 

MAY BE MODIFIED, AND ONLY BY "BIS" AND "BIC" INSTRUCTIONS 

9.4.8 THE OVERLAY MUST NOT CAUSE A TIMEOUT TRAP IN EITHER 

DEVICE PRIMING, INTERRUPT SERVICE, OR BACKGROUND TEST CODE. 

9.4.9 SCOPE LOOPS ARE NOT PERMITTED IN INTERRUPT SERVICE 
ROUTINES 

9.4.10 THE FIRST INSTRUCTION OF A BACKGROUND OVERLAY MUST NOT 
BE AN EMT (CALL TO GTP SCOPE LOOP ROUTINE). 
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10. MISCELLANIOUS 

10,1 EXECUTION TIME 



EXECUTION VARIES WITH NUMBER OF DEVICES* FOR 8KW SYSTEMS WITH 
TTY AND HSR ONLY* ABOUT 1 MINUTE WITH THE TRACE BIT CLEARED 
ABOUT 1,5 MINUTES WITH THE TRACE BIT SET, DEVICES SUCH AS 
THE AA1 1 DAC AND AD01-D A/D CONVERTER MAY LENGTHEN EXECUTION 
TIME TO OVER AN HOUR. (INTERRUPT MAY OCCUR AS OFTEN AS EVERY 
30 MICROSECONDS.) 


PROCESSOR ONLY RF* RK AND TC11 

(2 ASTERISKS) (2 ASTERISKS) 


8KW 

2.5 MINUTES 

3 

mm mm 

12KW 

5 

6 

16KW 

7.5 

9 

mm mm 

20KW 

10 

12 

mmmm 

24KW 

12.5 

15 

28KW 

20 

22 


MINUTES 


NOTE! IF THE PROGRAM IS BEING RUN UNDER ACT11 AUTO ACCEPT* 

A SINGLE PASS OF ACT11 WILL EQUAL ONE CYCLE THRU THE 
PASS TABLE. FOR AN 11/45 THIS WILL BE 12 ASTERISKS* FOR AN 
11/40 IT WILL BE 4 ASTERISKS, AND FOR AN 11/10 OR AN 11/20 
IT WILL BE 2 ASTERISKS. 

10.2 THE MEMORY LAYOUT IS BROKEN INTO FOUR DISTINCT PARTS! 

(1) THE TRAP CATCHER* 

(2) THE SET UP AND I/O PRIMER AREA AND I/O TEST ROU- 
TINES* 

(3) THE PROCESSOR TESTS AND 

(4) CONTROL AND UTILITY ROUTINES. 
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11. PROGRAM DESCRIPTION 

THE DESIGN OF THIS SYSTEM EXERCISER IS PREDICATED UPON 
IT BEING PRIMARILY INTENDED FOR A PAPER TAPE SYSTEM WITH 
EIGHT KW OF MEMORY, AND THAT IT BE EASY TO RUN 
AND UNDERSTAND. ALSO, THAT IT MAY BE MODIFIED 
EASILY TO EXERCISE A WIDE MULTITUDE OF PERIPHERALS, 

INCLUDING THOSE OF THE CUSTOMER'S OWN DESIGN. THE 
CONCEPT IS TO HAVE ALL DESIRED 1/0 RUNNING CONCURRENTLY 
WITH THE PROCESSOR TEST FOR BACKGROUND. THE DECISION 
OF WHICH I/O DEVICES ARE TO BE USED IS MADE AT STARTUP 
TIME. THE DATA PATTERNS USED IN THE EXERCISER ARE FIXED. FOR 
MECHANICAL DEVICES, SUCH AS THE TTY READER, THERE 
IS NO AUTOMATIC RESYNCHRONIZATION. IF PAPER TAPE BECOMES 
OUT OF PHASE WITH THE DATA, STOP THE EXERCISER, RESYNC 
THE TAPE, AND THEN RESTART THE EXERCISER. 

THERE IS NO MONITOR IN THE CONVENTIONAL SENSE. EACH 
DEVICE THAT IS TO BE EXERCISED HAS IT'S OWN STAND 
ALONE ROUTINE THAT OPERATES IN THE INTERRUPT MODE. 

THESE ROUTINES NEED NO SUPERVISION OR MONITORING 
AFTER THEY ARE INITIATED. THERE IS A PRIMER AREA THAT 
CHECKS THE SWITCH REGISTER TO SEE WHAT DEVICES ARE 
TO BE INITIATED. THE PRIMER AREA SETS THE INTERRUPT 
ENABLE BIT IN THE DEVICE STATUS REGISTER, INITIAL- 
IZES THE DATA PATTERN AND INITIATES AN OPERATION TO 
RAISE DATA FLAGS ON DEVICES THAT CAN NOT INITIATE 
THEM THEMSELVES. THEN, THE PRIMER JUMPS TO THE PRO- 
CESSOR TEST WHERE THE INDIVIDUAL DEVICES ARE SERVICED 
AT THE INTERRUPT RATE. 

NOTE I SEE The first PAGE OF the listing for a table OF CONTENTS. 

IN THE LEFTMOST COLUMN OF THE TABLE OF CONTENTS IS THE LINE 
NUMBER AT WHICH THE PARTICULAR ROUTINE CAN BE FOUND. LISTING 
LINE NUMBERS ARE SEQUENTIAL AND ARE IN THE LEFTMOST COLUMN 
OF EACH PAGE, 
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(11. CONT * D ) 

THE INSTRUCTION EXERCISER IS A STRAIGHT LINE TEST 
OF INSTRUCTIONS. THE SEQUENCE IN WHICH THEY ARE 
EXECUTED IS THE SAME SEQUENCE IN WHICH THEY ARE 
SHOWN IN THE LISTING. EACH AREA OF CODE FROM 
"SCOPE TO SCOPE" IS AN INDIVIDUAL SUB-TEST, WITH 
SWITCH 11 UP THE SUB-TEST IS EXECUTED ONE TIME 
AND THEN THE NEXT SUB-TEST IS EXECUTED, AND SO ON 
TILL ALL SUBTESTS HAVE BEEN EXECUTED. HOWEVER IF SWITCH 
11 IS DOWN THE SUB-TEST WILL BE EXECUTED SOME "N" 

NUMBER OF TIMES BEFORE ENTERING THE NEXT SUB-TEST, 

IF SWITCH 14 IS UP YOU WILL NEVER LEAVE THE CURRENT 
SUB-TEST YOU ARE IN. THIS USE IS INTENDED FOR 
TROUBLE SHOOTING A MALFUNCTION IN A SUB-TEST. THE 
FIRST GROUP OF SUB-TESTS ARE THE 8INARYS AND UNARYS. 

THOSE INSTRUCTIONS APE TESTED IN THE INDEX MODE: 

SOURCE ONLY, DESTINATION ONLY, THEN BOTH SOURCE 
AND DESTINATION. THE SAME INSTRUCTIONS ARE THEN 
TESTED USING THE IMMEDIATE MODE INDIRECT. THESE 
MODES ARE TESTED AGAINST OTHER MODES WHICH MAY USE 
A REGISTER OR MEMORY LOCATION. THESE WILL BE SWAPPED 
BETWEEN SOURCE AND DESTINATION. 

AFTER THE MODES AND INSTRUCTION HAVE BEEN PROVEN 
IN THE WORD MODE, THEY ARE THEN TESTED IN THE BYTE 
MODE. OTHER TESTING IS ALSO DONE WHERE THE "JSR" 
INSTRUCTION IS TESTED IN NESTED COMBINATIONS. ALL 
COMBINATIONS OF NUMBERS ARE TESTED USING THE COMPARE, 
ROTATE, ADD AND COMPLIMENT INSTRUCTIONS. THERE IS 
ALSO A MINIMUM TEST OF POWER FAIL AND AUTO RECOVERY, 

WHICH IS NOT ENABLED UNTIL AFTER THE FIRST PASS OF THE 
PROGRAM, THE PROGRAM REQUIRES TWO ASTERISKS ON THE TTY 
TO MAKE ONE TRUE PASS OF THE PROGRAM. THE FIRST ASTERISK 
OCCURS AFTER ONE PASS OF THE INSTRUCTION TEST WITH 
THE TRACE BIT CLEARED. THE SECOND ASTERISK MARKS THE 
END OF AN INSTRUCTION TEST PASS WITH THE TRACE BIT 
SET, THE REASON FOR EXECUTING ALL INSTRUCTIONS 
WITH THE TRACE BIT SET IS TO TAKE US INTO SERVICE AT 
THE END OF EACH INSTRUCTION. 

NOTE: THE KT1 1 OPTION IS NOT ENABLED UNTIL TWO PASSES HAVE 

BEEN COMPLETED (TWO ASTERISKS), 

NOTE: IF THE PROCESSOR UNDER TEST IS A PDP-11/45 THEN A 

MINIMUM OF 12 PASSES WILL BE REQUIRED FUR COMPLETE 
TESTING OF THE PROCESSOR. (SEE SECTION 5.2.1 FOR DETAILS 
OF THE PROCESSOR MODES THAT WILL BE EXERCISED). 
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11.1. SUBROUTINE ABSTRACTS 

11.1.1 BEGIN SA 200 

11.1.2 SCOPE 

THIS SUBROUTINE CALL IS PLACED BETWEEN EACH SUBTEST IN THE 
INSTRUCTION SECTION. IT RECORDS THE STARTING ADDRESS OF EACH 
SUB-TEST AS IT IS BEING ENTERED. IF A SCOPE LOOP IS REQUESTED, 
IT WILL JUMP TO THE START OF THE SUBTEST THAT THE SCOPE LOOP 
IS REQUESTED FOR. IF A SCOPE LOOP IS NOT REQUESTED, THERE WILL 
BE EITHER A FIXED OR RANDOM NUMBER OF ITERATIONS ON THAT SUB- 
TEST BEFORE THE NEXT SUBTEST IS ENTERED. SWITCH 11 ON A 1 
INHIBITS ITERATION OF SUBTESTS. ALSO SWITCH 10 IS TESTED TO 
SEE IF A WAIT INSTRUCTION SHOULD BE EXECUTED IN PLACE OF THE 
PROCESSOR TEST. 

11.1.3 PRINT 

THIS ROUTINE HANDLES THE ERROR CALL HLT, TYPING OUT THE ERROR 
ARGUMENTS AS LISTED IN SECTION 6.1, 

11.1.4 ENDPAS 

THIS ROUTINE IS EXECUTED AT THE END OF A PROGRAM 
PASS, AFTER THE END OF PASS ASTERISK IS PRINTED. 

THIS ROUTINE PERFORMES THE FOLLOWING THREE FUNCTIONS: 

A) TYPE AN ERROR MESSAGE INDICATING THAT A PASS 
HAS BEEN COMPLETED AND THAT NO ERRORS OCCURED 

DURING THE CURRENT PASS. CONTROL WILL THEN BE TRANSFERED 
TO THE ISOLATION ROUTINE CISOLAT) AND THE PROGRAM WILL 
BE RESTARTED. 

B) THE ROUTINE WILL SET THE PROCESSOR STATUS WORD 

TO THE NEXT MODE IN SEQUENCE, OR FREEZE IT IN THE 
CURRENT MODE, DEPENDING UPON WHETHER SW12sO 
OR 1, 

C) IF THE PROGRAM IS RUNNING IN MULTI-PROCESSOR MODE 
THE ROUTINE WILL RELEASE THE BUS SWITCH, AND THEN, 

AFTER A DELAY TO ALLOW THE OTHER PROCESSOR TO CONNECT 
THE SWITCH WILL BE REQUESTED, AND THE PROGRAM WILL 

BE RESTARTED WHEN THE SWITCH CONNECTS. 



11.1.5 


TRAPCATCHER 
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THIS IS A SERIES OF INSTRUCTIONS STARTING AT LOCATION 
0, DESIGNED TO DETECT AND ISOLATE UNEXPECTED TRAPS AND 
INTERRUPTS TO THE TRAP AND INTERRUPT VECTOR AREA OF 
MEMORY. 

THE PRINCIPAL OF THIS ROUTINE ISt THE VECTOR ENTRANCE 
ADDRESS POINTS TO THE NEXT SEQUENTIAL WORD WHICH CON- 
TAINS A HALT (00000). (THIS LOCATION IS ALSO THE STA- 
TUS FOR THAT VECTOR ENTRANCE, BUT THIS HAS NO EFFECT ON 
IT ALSO BEING THE NEXT INSTRUCTION). 

IF A HALT OCCURS IN THE TRAP OR INTERRUPT VECTOR AREA, 
REGISTER SIX SHOULD BE EXAMINED TO DETERMINE ITS CON- 
TENTS, THEN USE REGISTER SIX CONTENTS A5 AN ADDRESS TO 
DETERMINE THE LOCATION WHERE THE PROGRAM WAS WHEN 
THE INTERRUPT OR TRAP OCCURRED. (MEMORY AS SPECIFIED 
BY R6 CONTAINS THE PC OF THE INSTRUCTION FOLLOWING THE 
INSTRUCTION WHERE THE TRAP OCCURRED). 

11.1.7 WATCH (DEVICE WATCHDOGS) 

THIS ROUTINE DETERMINES, AFTER ALL OF THE PROCESSOR TEST HAS 
BEEN EXECUTED, WHETHER ALL INTERRUPT DRIVEN DEVICES THAT 
HAVE BEEN SELECTED INTERRUPTED AT LEAST ONCE DURING THE 
CURRENT PASS. IF A DEVICE DOES NOT INTERRUPT ON A GIVEN 
PASS, THE INTERRUPT OCCURED FLAG FOR THAT DEVICE IS NOT SET 
AND AN ERROR MESSAGE WILL BE TYPED INDICATING WHICH DEVICE 
IS FAILING. 

11.1.8 ISOLAT 

THIS ROUTINE WILL DELETE, SEQUENTIALLY, ONE OF THE 
DEVICES THAT HAS BEEN SELECTED FOR TESTING, AFTER 
THE INITIAL OCCURENCE OF ANY ERROR. EACH TIME ANOTHER 
ERROR OCCURS, OR AT THE END OF EVERY PASS IF NO ERROR 
OCCURS THAT PASS, THE PREVIOUSLY DELETED DEVICE WILL 
BE RESTORED TO OPERATION, AND THE NEXT SELECTED DEVICE 
WILL BE DELETED. THE PROGRAM WILL THEN REINITIALIZE 
ALL THOSE DEVICES THAT HAVE BEEN SELECTED FOR TESTING 
AND THE PROCESSOR TEST WILL BE RESTARTED, 
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11.1.9 TTYIN1 (TTY INPUT) 

THIS ROUTINE OPERATES IN THE INTERRUPT MODE 
AND CHECKS FOR A COUNT PATTERN IN THE READER 
OF THE TTY. THE ROUTINE WILL ACCEPT AN INFINITE 
NUMBER OF ZERO BYTES (BLANK TAPE). BUT THE 
FIRST BYTE THAT IS NOT A ZERO MUST BE A ONE 
AND ALL SEQUENTIAL BYTES MUST BE ONE GREATER, 

11.1.10 TYOUT (TTY OUTPUT) 

THIS IS A ROUTINE THAT OUTPUTS A COUNT PATTERN IN 
THE INTERRUPT MODE TO THE TELEPRINTER. 

11.1.11 RF1 1 (RF-11 DISK) 

THIS ROUTINE PERFORMS A WRITE AND A WRITE CHECK OF THE DISK. 

THE DATA THAT IS WRITTEN ON THE DISK IS PART OF TEST PROGRAM 
CODE THAT IS NEVER MODIFIED. THIS SEGMENT OF MEMORY IS WRITTEN 
IN CONTIGUOUS BLOCK THRU THE DISK MEMORY. AFTER THE TOTAL 
DISK (S) HAS BEEN WRITTEN, A WRITE CHECK IS USED TO VERIFY THAT 
THE data has BEEN WRITTEN CORRECTLY ON THE DISK. NOTE THAT NO 
"DATO" ARE USED IN EXERCISING THE DISK (DATA IS NOT TRANSFERRED 
INTO MEMORY). THERE IS A LOCATION IN THE PROGRAM THAT IF MODIFIED 
WILL ALLOW EXERCISING UP TO EIGHT DISKS. 


11.1.12 TCI 1 (TC11 DECTAPE) 

TCil IS THE FIRST ADDRESS IN THE DECTAPE INTERRUPT 
VECTOR (214). THIS ROUTINE WILL READ, IN REVERSE, BLOCK 
NUMBERS UNTIL THE REVERSE END ZONE IS FOUND. AT THIS 
POINT THE INTERRUPT VECTOR AND COMMAND REGISTER ARE MODIFIED 
TO READ ALL BLOCK NUMBERS IN THE FORWARD DIRECTION. EACH 
BLOCK NUMBER READ IS COMPARED WITH THE EXPECTED BLOCK NUM- 
BER COUNT AND MISCOMPaRISQNS REPORTED. WHEN EACH BLOCK IS 
FOUND (WITH THE EXCEPTION OF BLOCK 0) A BLOCK (400 WORDS) 

OF TEST DATA IS WRITTEN ONTO TAPE. AFTER ALL BLOCK NUMBERS 
HAVE BEEN READ THE TAPE IS DRIVEN INTO THE FORWARD END ZONE. 
HERE THE DIRECTION IS REVERSED AND ALL BLOCK NUMBERS ARE READ 
IN REVERSE, STARTING WITH BLOCK 1100 THROUGH BLOCK 1 THE 
DATA IS READ FROM TAPE. THE SAME BUFFER IS USED FOR BOTH READ 
AND WRITE OPERATIONS. THE DATA IN THE BUFFER IS CHECK- 
SUMMED WHILE IN THE PROCESSOR TEST "SCOPE" ROUTINE. IF 
THE DATA-BUFFER IS DESTROYED DURING A READ OPERATION IT 
MAY BE NECESSARY TO RELOAD THE PROGRAM. 

NOTES TCI 1 DRIVE 1 IS USED BY THIS TEST, 



n.1.13 KW11L (LINE CLOCK) 
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THIS TEST OF THE LINE CLOCK IS IN THE INTERRUPT 
MODE. THE CLOCK INTERRUPTS AT LINE FREQUENCY 
IF AN INTERRUPT OCCURS DURING A PASS, THE INTERRUPT 
OCCURED FLAG IS SET FOR THE LINE CLOCK. IF THE LINE 
CLOCK FAILS TO INTERRUPT SUBSEQUENTLY, THE FAILURE 
WILL NOT BE DETECTED UNTIL THE NEXT PASS, WHEN 
THE INTERRUPT OCCURED FLAGS ARE CHECKED AGAIN. 

11.1.14 LPINTR (LINE PRINTER) 

THIS ROUTINE OUTPUTS TO THE LINE PRINTER IN 
THE FLAG MODE WHILE FILLING THE BUFFER IN 
THE INTERRUPT MODE WHILE THE BUFFER IS BEING 
PRINTED. 

11.1.15 HSRIN1 (PC 11 INPUT) 

THIS ROUTINE OPERATES IN THE INTERRUPT MODE AND CHECKS FOR A 
COUNT PATTERN IN THE PC11 READER. THE ROUTINE WILL ACCEPT 
AN INFINITE NUMBER OF ZERO BYTES (BLANK TAPE). BUT THE FIRST 
BYTE THAT IS NOT A ZERO MUST BE A ONE AND ALL SEQUENTIAL BYTES 
MUST BE ONE GREATER. IF THE ROUTINE DETECTS AN ERROR IN THE 
COUNT PATTERN, A DATA ERROR IS FLAGED. 

11.1.16 HPOUT (PC11 OUTPUT) 

THIS IS A ROUTINE THAT OUTPUTS A COUNT PATTERN IN THE IN- 
TERRUPT MODE TO THE HIGH SPEED PUNCH. 


11.1.17 AD01D (ADOl-D A/D CONVERTER) 

THIS INTERRUPT MODE ROUTINE DOES A WAS-IS TEST ON CHANNELS 
ZERO THRU THREE. ONE CONVERSION FOR EACH CHANNEL IS LOADED 
INTO A TABLE, AND THEN A SECOND CONVERSION FOR EACH IS LOADED 
INTO ANOTHER TABLE. THE TWO TABLES ARE THEN COMPARED TO 
MAKE SURE THAT THE TWO CONVERSIONS FOR EACH CHANNEL ARE 
WITHIN t OR -1 LSB OF EACH OTHER. AFTER THE INITIAL LOOP 
THRU THE ROUTINE, THE TWO TABLES ARE LOADED ALTERNATELY, TABLE 
A IS LOADED AND COMPARED TO TABLE B, THEN TABLE B IS LOADED AND 
COMPARED WITH TABLE A, AND SO ON. THE CONVERSIONS ARE DONE 
AT A GAIN OF X8, AND THUS EACH CHANNEL (0-3) MUST HAVE A 
CONSTANT DC VOLTAGE ON IT LESS THAN 1,25 VOLTS. 
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11.1.18 AFCU (AFC 1 1 LOW LEVEL MULTIPLEXER) 

THIS INTERRUPT MODE ROUTINE DOES A WAS-IS TEST ON CHANNELS 
ZERO THRU SEVEN. AN AVERAGE OF EIGHT CONVERSIONS FOR 
EACH CHANNEL IS LOADED INTO A TABLE* AND THEN A SECOND SET OF 
AVERAGES IS TAKEN AND LOADED INTO A SECOND TABLE. THE TWO 
TABLES ARE COMPARED TO MAKE SURE THAT THE DIFFERENCE 
IN AVERAGES FOR EACH CHANNEL IS NOT GREATER THAN + 

OR -20 LSB. AFTER THE INITIAL TABLE OF 
AVERAGES IS TAKEN, THE SECOND TABLE REPLACES THE FIRST 
WHEN COMPARSION HAS BEEN COMPLETED. THE CONVERSIONS 
ARE DONE AT A GAIN OF 1000, AND THUS EACH CHANNEL MUST 
HAVE A CONSTANT DC VOLTAGE OF LESS THAN 5 MV AS AN INPUT. 

11.1.19 CRINT (CR 1 1 /CM 1 1 40 AND 80 COLUMN CARD READER) 

THIS INTERRUPT DRIVEN ROUTINE CHECKSUMS EACH CARD READ IN 
BOTH CARD-IMAGE AND ENCODED FORMS. ALL CARDS IN THE 
ALPHANUMERIC DECK HAVE THE SAME CHECKSUMS (ONE FOR CARD-IMAGE, 

ONE FOR ENCODED). THE TEST FAILS IF THE SUMS TAKEN ON 
A CARD FAIL TO MATCH THOSE FOR THE ALPHANUMERIC DECK. WHEN 
THE CARD READER GOES OFF-LINE, THE ROUTINE CLEARS THE 
INTERRUPT CAUSED BY THAT AND RETURNS TO THE MAIN PROGRAM. WHEN 
THE CARD READER IS PUT BACK ON-LINE, THE CORRESPONDING INTERRUPT 
IS CLEARED AND CHECKSUMING IS RESUMED. 

11.1.20 TM1 1 (MAGNETIC TAPE) 

THIS IS THE FIRST TAG OF THE MAGTAPE ROUTINE, HERE THE 
CONTROL IS GIVEN AN INITIAL COMMAND TO REWIND TAPE. WHEN 
BOT IS REACHED WE COMMENCE TO WRITE A RECORD 22 BYTES LONG. 

UPON COMPLETION OF THE WRITE, THE TAPE IS BACKSPACED ONE 
RECORD, AND WE THEN READ THE PREVIOUSLY WRITTEN RECORD. UPON 
COMPLETION OF THE READ THE TAPE READ BUFFER IS TESTED TO SEE 
IF IT CONTAINS ALL 52525, IF NOT AN ERROR IS REPORTED, WHEN 
FINISHED CHECKING THE BUFFER THE READ BUFFER IS FLUSHED 
TO ZEROS AND THE NEXT RECORD IS WRITTEN. THE SEQUENCE IS 
CONTINUED UNTIL .EOT IS DETECTED IN THE READ ROUTINE. THEN 
THE PROGRAM BRANCHES TO THE ORIGINAL ENTRANCE AND THE TAPE 
THEN REWINDS TO BOT AND THE SEQUENCE REPEATS ITSELF. 

11.1.21 RC11 (PC11 DISK) (SEE 11,1.11) 

11.1.22 RK1 1 (RK-11 DISK) 

THIS ROUTINE PERFORMS A WRITE AND A WRITE CHECK OF THE DISK. 

THE DATA THAT IS WRITTEN ON THE DISK IS PART OF TEST PROGRAM 
CODE THAT IS NEVER MODIFIED. THIS SEGMENT OF MEMORY IS WRITTEN 
IN CONTIGUOUS BLOCK THRU THE DISK MEMORY. AFTER THE TOTAL DISK(S) 
HAS BEEN WRITTEN, A WRITE CHECK IS USED TO VERIFY THAT THE DATA 
HAS BEEN WRITTEN CORRECTLY ON THE DISK. NOTE THAT NO "DATO" 

ARE USED IN EXERCISING THE DISK (DATA IS NOT TRANSFERRED INTO 
MEMORY). THERE IS A LOCATION IN THE PROGRAM THAT IF MODIFIED 
WILL ALLOW EXERCISING UP TO FOUR DISKS. 
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11.1.23 DC11T1 (DC 1 1 ASYNCHRONOUS LINE UNIT TRANSMITTER ROUTINE) 

THIS ROUTINE OUTPUTS A COUNT PATTERN IN THE INTERRUPT MODE, 

THE OUTPUT IS COUPLED BY SPECIAL INTERNAL HARDWARE TO THE 
RECEIVER WHERE THE SERIAL DATA IS REASSEMBLED, THE RECEIVER 
SECTION OF THE HARDWARE WILL INTERRUPT THE PROCESSOR EACH 
TIME A WORD IS REASSEMBLED, THE RECEIVED DATA IS COMPARED 
TO THE TRANSMITTED DATA BY SOFTWARE, 

11.1.24 DC11T2 (2ND DCU TRANSMITTER ROUTINE) 

THIS ROUTINE IS IDENTICAL TO THE DCOUT ROUTINE EXCEPT 

THAT IT ALLOWS FOR A SECOND DCU TO BE TESTED WITH THE SYSTEM, 

11.1.25 AA1 1 (AA1 1 DAC WITH SCOPE OPTION) 

THIS ROUTINE DISPLAYS THE MESSAGE "PDP-11" ON ANY OF THE 
CRT OPTIONS OF THE AA11. THIS MESSAGE IS POINT PLOTTED USING 
A 5 BY 7 MATRIX TWO DAC'S ARE USED ONE FOR THE Y AXIS, ONE 
FOR THE X AXIS, THIS ROUTINE IS INTERRUPT DRIVEN AND FLICKER 
MAY BE OBSERVED IF OTHER DEVICES ARE BEING TESTED AT THE SAME 
TIME. 

11.1.26 DPI IT (DPI 1 SYNCHRONOUS LINE UNIT) 

THIS ROUTINE USES PROCESSOR TEST CODE AS AN OUTPUT 
BUFFER, FOR TRANSMISSION IN THE INTERRUPT MODE, 

THE OUTPUT IS COUPLED BY SPECIAL INTERNAL HARDWARE TO THE 
RECEIVER WHERE THE DATA IS REASSEMBLED. BOTH THE TRANSMITTER 
AND RECEIVER ARE DOUBLE BUFFERED. THE BYTE BEING TRANSMITTED 
AND THE BYTE BEING RECEIVED MAY BE THREE CHARACTERS APART. 

THE RECEIVED COMPARED TO A PREDICTED VALUE BY SOFTWARE. 

THE DPI! USES A SYNC CHARACTER OF 26(8). 

11.1.27 DM1 IT (DM11 ASYNCHRONOUS MULTIPLEXER) 

THE DMll ROUTINE TRANSMITS A BINARY COUNT PATTERN ON ALL 
16 DMU LINES (UNLESS PATCHED OTHERWISE), AND RECEIVES 
DATA ON ALL ACTIVE LINES (IF JUMPERS ARE INSERTED, OTHERWISE 
DATA IS RECEIVED ON LINE 0 ONLY). RECEIVED DATA IS 
CHECKED ON LINE 0 ONLY. THE PROGRAM IS SET FOR THE DmU TO 
INTERRUPT TO LOCATION 340 (RECEIVER) AND 344 (TRANSMITTER) 

AND SERVICES INTERRUPTS AT LEVELS, RECEIVED DATA IS 
CHECKED AT 8 BITS PER CHARACTER BUT MAY BE PATCHED 
OTHERWISE. LINE 0 HAS A SPECIAL INTERNAL HARDWARE 
MAINTENANCE LOOP. 

NOTE! THE MAINTENANCE CARD MUST BE INSTALLED TO PUN THIS TEST 
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11.1.28 ABS DUMP ROUTINE 

THE ABS DUMP ROUTINE WAS INCLUDED TO ALLOW THE CREATION 
OF TAILORED VERSIONS OF GTP FOR SOME OF THE FOLLOWING 
REASONS* 

1. PRESET SWITCH REGISTER SET UP TO ALLOW STARTING AT 
200 WITH ALI* HITCHES DOWN. 

2. VECTORS FOR RELATIVE DEVICES SUCH AS 0PU,DM11, ETC. 

MAY NEED TO BE CHANGED FOR CERTAIN CONFIGURATIONS. 

3. ROUTINES OF USER ORIGIN MAY BE MERGED WITH THE EXISTING 
CODE. 

4. LPl 1 ROUTINE MODIFIED FOR 132 COLUMNS 

5. KL11 ROUTINE MODIFIED FOR THE VTQ5.VT06, OR LCU. 

11.1.29 DP11B (DR11B GENERAL PURPOSE NPR INTERFACE) 

THERE ARE TWO SEPERATE WAYS THIS OPTION MAY BE TESTED. IN 
MAINTENANCE MODE AND AS A INTER-PROCESSOR BUFFER. 

MAINTENANCE MODE REQUIRES THAT THE MAINTENANCE MODULE BE 
IN SLOT CQ4, D04 . UNDER THESE CONDITIONS A TEST IS 
PERFORMED ON THE "NPR", AND THE DIRECTION CONTROL LOGIC 
(C LINES). THIS TEST IS IN LINE AS A PROCESSOR TEST AND 
PERFORMS MULTIPLE "NPR" TRANSFERS WHEN ENCOUNTERED. IN 
THIS MODE THE FIRST WORD OF THE BUFFER IS TRANSFERED 
INTO THE SECOND WORD, THE THIRD WURD INTO THE FOURTH 
WORD. THIS SEQUENCE CONTINUES UNTIL WORD COUNT OVERFLOWS. 
NOTE* THE DRUB IN MAINTENANCE MODE WHEN DOING "NPR" BECOMES 
BUS MASTER FOR FOUR (4) NPRS, 

TO BE USED AS AN INTER-PROCESSER BUFFER REQUIRES TWO 
COMPUTERS, EACH HAVING ITS OWN DRUB WITH A SPECIAL CABLE 
CONNECTING THE DRUB TOGETHER. THE PROGRAM MUST BE 
LOADED INTO EACH COMPUTER, BLOCK TRANSFER OF DATA IS MADE 
IN EACH DIRECTION CONTROLED BY AN INTERRUPT DRIVEN 
ROUTINE. WHILE DOING THESE TRANSFERS THE DRllB GIVES UP 
THE BUS MASTER SHIP AFTER EACH "NPR" TRANSFER. 



it, 1.30 EXPAND (MEMORY EXPANSION) 
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THIS MEMORY EXPANSION IS ACCOMPLISHED BY REPEATING A UNIQUE 
TEST IN UNUSED MEMORY, IN THE STRAIGHT LINE CODE A TEST 
IS MADE TO SEE IF EXTRA MEMORY IS TO BE USED. IF SO THE 
MEMORY IS FILLED WITH THE UNIQUE TEST, THEN THE PROCESSOR 
TEST JUMPS TO THE START OF THE EXPANDED CODE. THIS CODE IS 
EXECUTED IN THESE MEMORIES UNTIL THE END OF THE CODE IS 
REACHED, THEN IT WILL RETURN TO THE NORMAL PROCESSOR TEST. 

IN EXPANDED MEMORY EACH COPY OF THE UNIQUE TEST IS ITERATED 
4000(8) TIMES BEFORE THE NEXT COPY IS EXECUTED. 

THE AMOUNT OF MEMORY IS DETERMINED BY DOING A TST (0) + UNTIL A 
TIME OUT TRAP OCCURS. THE VALUE IN THE REGISTER AT THIS TIME 
IS CONSIDERED TO BE HIGH MEMORY. 1000(8) BYTES ARE SUBTRACTED 
FROM THIS VALUE TO LEAVE A BUFFER AT THE TOP OF MEMORY. 

A COPY OF THE ROTATE BYTE INSTRUCTION TEST IS USED AS 
THE UNIQUE TEST TO FILL MEMORY, THIS TEST IS WRITTEN IN 
POSITION INDEPENDENT CODE. 


11.1.31 CD1 1 (NPR CARD READER) 

THIS ROUTINE READS AND CHECKSUMS 1 CARD AT A TIME IN 
BOTH ALPHA AND IMAGE MODES. EXCEPT FOR THE FACT THAT 
AN ENTIRE CARD IS READ VIA NPRS, AND THE DATA STORED IN 
A TEMPORARY BUFFER, THE OPERATION OF THE ROUTINE IS SIMILAR 
TO li.1.19. 

11.1.32 DN11 (DNli DIGITAL DIALER) 

THIS ROUTINE IS AN IN-LINE DEVICE TEST AND IS RUN AFTER ALL 
PROCESSOR TEST CODE (EXCEPT MEORY EXPANSION) IS COMPLETED. 

THE DN11 IS OPERATED IN MAINTENANCE MODE, AND AN INTERRUPT 
OCCURS EACH TIME A MAINTENANCE FUNCTION IS SET. 

THE TEST IS REPEATED 4000 TIMES (OCTAL) . 

11. 1. 33 UDC11 (UNIVERSAL DIGITAL CONTROLLER) 

THIS ROUTINE IS AN IN-LINE DEVICE TEST AND IS RUN AFTER 

ALL PROCESSOR TEST CODE (EXCEPT MEMORY EXPANSION) IS COMPLETED. 

THE UDC11 IS OPERATED IN MAINTENANCE MODE. INTERRUPTS 

ARE GENERATED IN IMMEDIATE AND DEFERED SCAN MODES BY 

SETTING THE MAINTENANCE BIT. THE TEST IS REPEATED 4000 

(OCTAL) TIMES EACH PASS. 

11.1.34 DRACT (DR1 1 A,C GENERAL INTERFACE) 

THIS ROUTINE IS AN IN-LINE DEVICE TEST AND IS RUN AFTER 
ALL PROCESSOR TEST CODE (EXCEPT MEMORY EXPANSION) IS COMPLETED. 
THE DEVICE IS RUN IN MAINTENANCE MODE, AND THE TEST CONSISTS 
OF 2 PARTS, A DTAT TEST, AND AN INTERRUPT TEST. 

THIS TEST IS REPEATED 4000 TIMES (OCTAL) EACH PASS. 
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11.1.35 KGSTRT (KG11 CYCLIC REDUNDANY CHECK OPTION) 

THIS ROUTINE IS AN IN-LINE DEVICE TEST AND IS RUN AFTER 
ALL PROCESSOR TEST CODE (EXCEPT MEMORY EXPANSION) IS COMPLETED, 
THE KG11 IS A NON-INTERRUPTING DEVICE# AND THE TEST 
CODE IS SIMILAR TO PROCESSOR TEST. 

THREE FUNCTIONS OF THE KG11 ARE TESTED #CRC12# CRC16# AND CCITT. 
EACH FUNCTION IS TESTED BY TRANSMITTING KNOWN DATA TO 
THE KG1 1 # AND COMPARING THE RESULTS OF THE HARDWARE OPERATION 
WITH A TABLE F KNOWN RESULTS. THE TEST IS REPEATED 
4000(OCTAL) TIMES EACH PASS. 

11.1.36 DM11-BB (MODEM CONTROL MULTIPLEXER) 

THIS ROUTINE IS AN IN-LINE DEVICE TEST AND IS RUN AFTER 

ALL PROCESSOR TEST CODE (EXCEPT MEMORY EXPANSION) IS COMPLETED. 

THE DM11-BB IS OPERATED IN MAINTENANCE MODE WITH INTERRUPTS 

ENABLED AND THE LINE SCANNER RUNNING. THE SCANNER 

MEMORY IS INITIALLY CLEARED TO 0, AND DETECTION OF 

THE MAINTENANCE MODE INPUTS TO THE SCANNER WILL 

CAUSE AN INTERRUPT ON EACH LINE. 


11.1.37 M792YA (PAPER TAPE BOOTSTRAP LOADER) 

THIS IS AN INLINE DEVICE TEST. THE CONTENTS OF THE 
M792YA READ ONLY MEMORY ARE ADDED TO FORM 
A CHECKSUM. THE RESULT IS COMPARED WITH A KNOWN VALUE, 

IF THE CHECKSUMS ARE DIFFERENT, AN ERROR IS REPORTED. 

THE TEST IS REPEATED 4000(OCTAL) TIMES. 

11.1.38 M792YB (BULK BOOTSTRAP LOADER) 

THIS IS AN INLINE DEVICE TEST. IT IS A COMBINED TEST 
FOP THE M792YB AND MF11-DB BULK STORAGE 
DEVICE BOOTSTRAP LOADERS, WHICH BOTH HAVE 
THE SAME ADDRESS ON THE I/O PAGE. 

AN ATTEMP IS MADE TO DETERMINE WHICH Of THE 
TWO DEVICES IS INSTALLED IN THE SYSTEM. IF NEITHER 
DEVICE IS RECOGNIZED, AND NO TIME-OUT TRAP OCCURS, AN 
ERROR IS REPORTED. IF THE DEVICE IS RECOGNIZED# A CHECKSUM 
OF THE DEVICE'S READ ONLY MEMORY IS COMPUTED# AND COMPARED 
WITH A KNOWN VALUE FOR THAT DEVICE. IF THE CHECKSUMS 
DIFFER, AN ERROR IS REPORTED. THE TEST IS RUN 40Q0(QCTAL) 
TIMES. 
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ITNIS PROGRAM IS A MULT!*OEV!Cfe feXPRClSeR 

ITNIS PROGRAM IS NOT INTENDED 1$ EITHER 

IA COMPLETE ' TfST OF THE PROCESSOR* OR AS A DETAILED 

DIAGNOSTIC FOR ANY DEVICES THAT HAVE BEEN SELECTED 

I THIS PROGRAM REQUIRES A MINIMUM OP AKW OP MEMORY FOR OPERATION 

ICOPYRIGHT 1970* 1971, 1972, 1973, DIGITAL EQUIPMENT CORP;, MAYNARD MASS, 01754 


IFOR NORMAL OPERATION RUN WjTH ALL SWITCHES DOWN 
iSRlSsl upJ?»*halt ON error 

|SR14*1 UPt— SCOPE LOOP • PROCESSOR TEST 

|SPl3sl UP«**1NHIBIT PRINT OUT 

|SRl2ii Up r , -FREEZE PROCESSOR |N CURRENT MODE 

iSRliil UPb**INHIBIT SUB*PROfiRlM ITERATiONIWATCMDOSS ARE NOT CHECKED) 
|SRl0fl UPi««!NHIBIT PROCESSOR TEST 
lSR09lt UP®-- 1 NH IB IT MEMORY EXPANSION 
ISR0911 UP — -I$OLATION*-BY dropout 

|SP0Ti 1 UPe«»SWITCH ERROR MESSAGES TO HIGH SPEED PUNCH 
I (USE ONLY IF HIGH SPEED punch TESTING IS INHIBITED) 

I SR08st UP«— RESTART PROGRAM ON ERROR 

)|F The PROCCSSER UNDER Test is An li/45, SR12I0 ENABLES The following! 

I PASS 0,14,ETC KERNEL MODE 1 R0-R3 , NO *T f TRAP 

I PASS 1,19, ETC KERNEL MODE,R0*R5, *T* TRAP 

I PASS 2 ,16, ETC KERNEL MODE,R10»R15,NO*f * TRAP 

1 pass 3 , i7 , etc kernel mode,ri0-ri3,*ti trap 

I PASS 4, 20, ETC SUPERVISOR MODE, R0*R3,NO iff TRAP 

I PASS 5, 21, ETC SUPERVISOR MODE, R0-R5, 1 1 f TRAP 

I PASS 6, 22, ETC SUPERVISOR MQDE,R10-R15,NO tff TRAP 

I PASS 7, 23, ETC SUPERVISOR MODE,R10*R15 , >Tl TRAP 

I PASS 10, 24, ETC USER MODE , R0-R5, NO >T* TRAP 

I PASS 11, 25, EfC USER MODE,R0.R5,*T* TRAP 

| PASS lZ,26,EtC USER MODE , R10-R15, NO It) TRAP 

I PASS 13, 27, EfC USER MODE, R10-R15, TRAP 

I IF THE KU1 IS PRESENT, ALL PASSES EXCEPT 0 AND 1 ARE RUN WITH 
ITHE KTll ON IF NOT INHIBITED'. (SW05 MUST BE DOWN ?N THE 3RD 
I OfeVICE INHIBIT SETTING Tq ALLOW USE OF THE KTll) 


INOTEI T H E PASS COUNT iS GjVEN JN OCTAL AND jS DlSPLAYEO IN TwE 
I DISPLAY REGISTER (PDPfll/45 ONLY)' 

I IF THE PROCESSOR UNDER TEST IS A PDP-Cl/40, SR12R0 ENABLES THE FOLLOWlNGl 


PASS 0,4, ETC 
PASS l,5,ETc 
PASS 2, 6, ETC 
PASS 3, 7, ETC 


KERNEL MODE, NO TRAP 
KERNEL MODE, I T * TRAP 
USER MODE, NO IT* TRAP 
USER MODE, (ti TRAP 


JjF THE KTll IS PRESENT, ALL PASSES EXCEPT 0 AND 1 ARE RUN WjTH THE 
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58 

59 

60 
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62 

63 

64 

65 

66 

67 

68 
69 
*0 
71 
ii 

73 

74 

75 

76 

77 

78 

79 
B0 


I Kf 11 ON IP NOT INHIBITED, 


ISpECIAL DELETE SWITCHES-SET respective switch to a 1 
I TO INHIBIT INITIALISATION OF DEVICE 

I NOTE * IF A NONEXISTENT DEVICE IS SELECTED In ANY OF THE 
JTHREE DEVICE INHIBIT SETTINGS, A BUS ERROR TRAP WILL OCCUR aNO 
I THE PROGRAM WILL HALT AT LOCATION 6 


lAfTER starting 
iswam inhibit 
I SW01*1 inhibit 
|SW 02»1 INHIBIT 
I SW03»1 INHIBIT 
I SW04 »1 INHIBIT 
|SW05?t INHIBIT 
JSW06«1 INHIBIT 
1 SW07«1 INHIBIT 
|SW03=t INHIBIT 
JSW09=1 inhibit 
|SW10«1 INHIBIT 
JSW11»1 INHIBIT 
|SW12»1 INHIBIT 
I S W 1 3 « 1 INHIBIT 
|SW14?1 INHIBIT 
I SW15*1 INHIBIT 


address has been loaded 
OT ll BUS SWITCH SELECTION 
MULTIPROCESSOR TESTING 
PUll HSP 
PCll HSR 

KWii»L LINE CLOCK 
CRll CARD READFR 

KWH»p PROGRAMMABLE d EAL TIME CuOCK 

LPll LINE PRINTER i-- IF LINE PRINTER IS USED, MUST RESTART 

SECTION ONE AND TWO OF THE BUS TESTER (FACTORY USE ONLY) 

SECTION THREE ANO FOUR OF THE BUS TESTER (FACT.ORV USE ONLY) 

RFll DISK 

UDC 11 

RCH DISK 

TCll DECTARE 

KL 11 TTY OUTPUT 

KLU TTY input 


AT 


SI 

82 

83 

84 

85 

86 

87 

88 

89 

90 

91 

92 

93 

94 

95 

96 

97 

98 

99 
100 
101 
102 

103 

104 

105 

106 

107 

108 


i note i if all switches are mown for this first device Inhibit 

JSeTTIMG, THE PREVIOUSLY CHOSEN DEVICES WILL BE TESTED 


iaFter FIRST halt 

I SW 00*1 INHIBIT OC 11 #1 \\\\ VECTOR 30 p 

)Svi 01 ?t INHIBIT DCll #2 VECTOR 310 

|SW 02®1 INHIBIT AAH D AC WITH SCDPF OPTION 

) SW 03=1 INHIBIT AFC 11 ANALOG MULTIPLEXER 
»SW 04*1 INHIBIT RKU DISK 

I SW 05*1 INHIBIT ORli,B GENERAL INTERFACE (NPR) 

I SW 06 f i INHIBIT KEll» A ( p D p -il? 2 P> EXTENDED ARITHMETIC ELEMENT 
ISW 07 U INHIBIT AD 01 *O A/D CONVERTER 
|SW 08?1 INHIBIT RPil DISK 

|SW 09 al INHIBIT RESERVED (EQR BUS LATENCY TESTER) 

ISW 1011 INHIBIT DNU DIGITAL DIALER 

ISWUPI INHIBIT TMll MAGNETIC TAPE 

ISW 12 P 1 INHIBIT M 792 VA (OlODE BOOT FOR PCU.KLll) 

I Swi 3 sl INHIBIT M 792 YB { R F > PC, RK AND TCll) BOOT 
I OR MRll.DB BULK BOOTSTRAP LOADER 

|SW 14 ii INHIBIT OPll SYNCHRONOUS LiNE UNIT VECTOR 320 
|SW 15*1 INHIBIT DM 11 ASYNCHRONOUS MULTIPLEXER VECTOR 330 


I AFTER SECOND HALT 

JSW 00 S 1 INHIBIT KGti*A REDUNDANCY CHECK OPTION 
|SW 0 in INHIBIT COll CARD READER 

J $W 02 »i INHIBIT QRll.Ai DRU.C GVENE«Al INTERFACE (INTERRUPT ONLY) 
I SW 03*1 INHIBIT DMHwBB MODEM CONTROL MULTIPLEXER 
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109 

110 
111 
112 

113 

114 

115 
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117 

118 

119 

120 
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127 

128 

129 

130 

131 

132 
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134 

135 

136 

137 

138 

139 

140 

141 

142 

143 

144 

145 

146 

147 

148 

149 

150 

151 

152 

153 

154 

155 

156 

157 

158 

159 

160 
161 
162 


JSW04H INHIBIT 
I SW05«1 INHIBIT 
J5W06S1 INHIBIT 
I SW07*1 INHIBIT 
I S W 2 8 * 1 INHIBIT 
|SW09si INHIBIT 
ISW10I1 INHIBIT 
jSWllsi INHIBIT 
I S W 1 2 s 1 INHIBIT 
I SW13 st INHIBIT 
I S W1 4 ■ 1 INHIBIT 
ISW15=1 INHIBIT 


VR 20 2 COLOR SCOPE OPTION 
KTll MEMORY MANAGEMENT OPTION 

reserved 

reserved 

reserved 

RESERVED 

RESERVED 

RESERVED 

RESERVED 

RESERVED 

reserved 

reserved 


I AFTER HALT SET SWjTChES FOR NORMAL RUNNING (ALL DOWN) CONTINUE 


iThE format for all error printouts ts seven columns of data 
i the significance of each column is described below 


i Column l* pc+2 qf the test that failed 

ICOLUMN 2 * PROCESSOR STATUS AT THE TIME OF FAILURE 
ICOLUMN 3 » PROCESSOR TEST In PROGRESS AT THE T IMF OF FAILURE 
ICOLUMN 4 m STACK OFFSET 

ICOLUMN 5 * FIRST DEVICE SELECTION ( 5 * 1 ) REGISTER 
ICOLUMN 6 w SECOND DEVICE SELECTION ( RR? ) REGISTER 
ICOLUMN 7 w THIRD DEVICE SELECTION ( SR 3 ) REGISTER 

I NOTE! I iF A POWER FAILURE OCCURS, An ERROR MESSAGE WILL n E 

j typed in the standard format after power up occures, 

|ThE program will then BEGIN EXECUTION of PROCESSOR test 
I AND WILL COMPLETE THE PROCESSOR TEST BEFORE RE- INITIALISING 
ISELECTED DEVICES, THIS DELAY IP NECESSARY TQ 
JALLOW MECHANICAL DEVICES To RECOVER FROM THE POWER FAILURE, 

I NOTE I The PROCESSOR STAC K POINTER Wtll BE SET To LOCATthn 
j»stack» each time that the processor test is started, 

I At THE END OF EACH PASS, The PROCESSOR STACK POINTER Will 
I BE SET TQ LOCATION "STACK*"'. if THE PROCESSOR 
l(PDP*ll/ 45 ) IS OPERATING IN OTHER Than KERNFL MODE 
|THE CURRENT MODE STACK POINTER WILL BE INITIALIZED TO "STACK" 

I AND the KERNEL STACK POINTER WILL BE SET TO "STACKK", 

J NOTE I CORE EXPANSION may BE ROn WITH A Gtp OVERLAY, IE THAT 
I OVERLAY DOES NOT REQUIRE M 0 RE THAN 4 K OF CORE', 

JNoTEl THE PROGRAM IS INITIALIZED WrTH A SpECiFjC DEVICE 
I REGISTER AND VECTQR aDDRFSS ASSIGNMENT FOR FLOATING 

J VECTOR DEVICES, TO ACCOMODATE OTHER CONFIGURATIONS, 

) APPROPRIATE CHANGES SHOULD 8 F m A DE IN THE "QFVICF 

I REGISTER AND VECTOR TABLE*", 

i NOTE I THE EolloWInG OPTIONS WI L 'L BE TESTED UNCONDITIONALLY IE A V A 1 1 _ A B l F 

1 PDP- 11/40 EIS 
jPDP-li /40 FIS 
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IN BITS 8*10 | 

169 


1 note I 
1 

the inputs of 
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MUST EACH be ( 

in 


( 
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1 IS NOW SELECTED FOR TEST RY THIS PROGRAM', 

' |E N T DRIVE# PUT THE DRIVE SELECTION CODE 
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definitions 
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176 

000000 


R0IX0 


177 

000001 


RliXl 


178 

000002 


R2sX2 


179 

000003 


R3*X3 


180 

000004 


R4*K4 


181 

00000$ 


R5«X5 


182 

000006 


SP*X6 

/PROCESSOR STACK POINTER 

163 

000007 


PC*X7 

/PROGRAM COUNTER 

164 

000000 

FPSi 

%z 


185 

000000 

ACeii 

X0 


186 

000001 

ACii 

%i 


187 

000002 

AC2i 

n 


168 

000003 

ACS* 

*3 


189 

000004 

AC4* 

X4 


190 

00000$ 

ACS* 

*5 


191 





192 



ILOCATION DEFINITIONS 


193 





194 

177776 


PS1177776 

/PROCESSOR STATUS WoRD 

195 

177772 


PIRQ«177772 

/PROGRAM INTERRUPT REQUEST REGISTER 

196 

177570 


SR4177570 

/CONSOLE SWITCH REGISTER 

197 

177570 


LIGHTS*177570 

lPDP-li/45 DISPLAY REGISTER 

198 

199 



i instruction definitions 

200 





201 

202 

006401 

104400 


MARKH6401 

SC0PE*TRaP 

/MARK INSTRUCTION 

/ CALL to SCOPE LOOP AND ITERATION HANDLER 

203 

075000 


FADD*75000 

lii/40 FIS FLOATING ADD 

204 

075010 


FSUB-75010 

/ •* « » SUBTRACT 

205 

075020 


FMUL*75020 

/ « « " MULfiPLY 

206 

075030 


FOIV*750?0 

/ « *» M DIVIDE 

207 



iEQUIV EMT.HLT 


208 

075010 


FSUB*75010 

lli/40 FIS FLOATING SUBTRACT 

209 

075020 


FMUL»79020 

111/40 FIS FLOATING MULTIPLY 

2i0 

075030 


FDIV-75030 

lii/40 FIS FLOATING DIVI6E 


140090 


I SYMBOL DEFINITIONS 
UMil«0W 
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OiOGAC.Pll TRAPCAYCHER 


221 



.SBTTL 

TRAPCATCHER 

222 



i « 12 » halt is loaded INTO 

223 



•000 THRU 476 

224 





225 



.sbttl 

VECTORS 

226 




IPRESET VECTORS 1 

227 





228 


000014 

. *1 4 


229 

00001* 

034010 


trtret 

230 

000016 

000140 


14 0 

231 

000020 

001032 

lOfVECi 

DMYRTI 

232 

000022 

000000 

IOfLVLj 

0 

233 





23* 


000024 

, *24 


235 

000024 

035514 


PFAIL 

236 

000026 

000340 


34§ 

237 

000030 

034352 


PRINT 

238 

000032 

0003*0 


34D 

239 

00003* 

035116 


SCOPEC 1 

240 

000036 

000000 


0 

241 





242 


000060 

,960 

TTrIVI 


243 

000060 

004436 

ttyJnr 

244 

000062 

000200 


200 

245 

§00064 

004526 

TTPIVI 

TYOUTR 

246 

§00066 

000200 


200 

247 

§00070 

004552 

HSRlVl 

HSR I NR 

248 

§00072 

000200 


200 

249 

§00074 

004622 

HSFIVl 

HpOUTR 

250 

§00076 

000200 


200 

251 

§00100 

010352 

KLIVI 

«W11L 

252 

§00102 

000300 


300 

233 

§00104 

010214 

KWIVI 

KW11P 

25* 

§00106 

000300 

300 

255 





256 


000124 

,*124 


257 

§00124 

031160 

ORB 1 V 1 

ORlR 

258 

§00126 

0002*0 

240 

259 

§00130 

006304 

AD01IVI 

AQ01D 

260 

§00132 

0002*0 


240 

261 

§00134 

003670 

AFC I V 1 

AFCil 

262 

§00136 

000240 


240 

263 

§00140 

006566 

AAUIVI 

A All 

26* 





265 

§00142 

000200 


200 

266 





267 


00020* 

, 9204 


268 

§0020* 

007420 

RFJVI 

RFU 

269 

§00206 

000240 


240 

zu 

§00210 

§0*314 

RCfVI 

RCU 

2*1 

§00212 

000240 


240 

272 

§0021* 

012164 

TCI V 1 

TCll 

2*3 

§00216 

000300 


300 

2*4 

§00220 

00*07* 

RKfVl 

RKU 


• TRADE rnAP return 

> SERVICE at Level 3 

ICALL to USER BACKGROUND OVERLAY 

I SERV I eTE AT LEVEL P 


1 POWER FAllgnt HANHuEr 
I SERVICE AT LEVEL > 

• TRAP POP ERROR HANDLER 

IpRlMT At Level: 7 (DROPS TO 4 JN ROUTINE) 

I TRAP POP LOOPING 

ILOOP service AT LEVEL 0 


ITELFTYPF READER 
•SERVICE AT LEVEL 4 
I TELEPRINTER 
•SERVICE AT LEVEL 4 
1 H I GW SPEED READER 
•SERVICE at level 4 
I HIGH SPEED PUNCH 
I SERVICE AT LEVEL 4 
JKWli„L LINE CLOCK 
•SERVICE AT LEVEL 6 
IKWll.P 

•SERVICE At LEVEL 6 


JDRli-B GENERAL NPr INTERFACE 
•SERVICE AT LEVEL 5 
IAO01*(5 A-D converter 
•SERVICE at LEVEL 5 
•APCil ANALOG MULTIPLEXER 
•SERVICE AT LEVEL 5 
• AAli«A,P,r DIGITAL TO ANALOG 
•CONVERTER WITH DISPLAY 
•SERVICE AT LEVEL 4 


•RPll DISK 
SERVICE At LEVEL 5 
•RCli DISK 
•SERVICE At LEVEL 5 
ITCii 6ECTAPP 
•SERVICE At LEVEL 6 
IRKlI DISK 
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2*5 

§00222 

0002*0 


240 


•SERVICE AT LEVEL 5 

2*6 

§0022* 

00*5*6 

mti V 1 

TM11 


•Mill MAGNETIC tape 

2*7 

§00226 

0002*0 


240 


•SERVICE At LEVEL 5 

2*8 

§00230 

00*714 

CRSRIVi 

CRCM11 


•CARD READER (CRll/CMU OR COll) 

2*9 

§00232 

000300 

CRORPSi 

300 


• SERVICE AT LEVEL 6 (CRll/CMU) nR *(CDU) 

210 

§00234 

031026 

UDIVI 

Up I NT 


IUDCU UNIVERSAL DIGITAL CONTROLLER 

281 

§00236 

000300 

UDFSI 

300 


•service at level 6 

fc w C 

283 


0002*0 

, *240 




284 

§002*0 

000000 

PIRVEC)! 

2 


•SOFTWARE interrupt 

285 

§002*2 

000000 

P I RLVL 1 

0 


•SERVICE at selected level 

286 


000250 

, *250 




287 

§00250 

000252 

SEGVECI 

252 



288 

§00252 

000000 

SEGLVLi 

0 



289 

§00254 

00*210 

RPIVI 

RPU 


•RPli DISK PACK 

290 

§00256 

0002*0 


240 


•SERVICE AT LEVEL 5 

291 







292 


000300 

,9300 




293 

§00300 

01065* 

ociRivi 

DCllRl 


•DCli #i RECEIVE 

29* 

§00302 

000300 


300 


•SERVICE at LEVEL 6 

295 

§00304 

010622 

OC1TIVI 

DC11T1 


•DCli *1 TRANSMIT 

296 

§00306 

000300 


300 


•SERVICE at LEVEL 6 

297 

§00310 

011002 

OC2RIVI 

DC11R2 


•DCli *2 RECEIVE 

298 

§00312 

000300 


300 


•service at level 6 

299 

§00314 

010750 

DC2TIVI 

DC11T2 


•DCli #2 TRANSMIT 

300 

§00316 

000300 


300 


jservice at level 6 

301 







302 


000510 

, *510 




303 

§00510 

013750 


BU5T1 


•BUS TESTER SECTION 1 

304 

§00512 

000300 


300 


JSERVICE at LEVEL 6 

305 

§0051* 

§14062 


BUST2 


•BUS TESTER SECTION 2 

306 

§00516 

0003*0 


340 


•SERVICE AT LEVEL 7 

307 

§00520 

01*1*4 


8UST3 


•BUS TESTER SECTION 3 

308 

§00522 

000240 


240 


•SERVICE AT LEVEL 5 

309 

§00524 

01*516 


8UST4 


•BUS TESTER SECTION 4 

310 

§00526 

000200 


200 


•SERVICE AT LEVEL 4 

311 







312 



ILoAD STARTING 

ADDRESSES 

313 


000200 

,9200 




3f* 

§00200 

000167 001336 


JMP 

BEGINl 


3l5 


000*00 

,9*00 




316 

§00*00 

000167 001136 


JMP 

begini 


31* 


000600 

,9600 




318 

§00600 

000167 000736 


JMP 

BEGINl 


319 


000610 

,§'♦* 
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320 




.sbttl 

ABSOLUTE CORE DUMP 


321 




f 

INSTRUCTIONS FOR U§Ei 


322 

323 




1 

1 

1. 

START THE ROUTINE AT 610, 

324 




1 

2, 

THE DUMP ROUTINE 

WILL NOW halt; ENTER THE ADDRESS OF THE 

325 




J 


desired output device Into the switch register and 

326 




I 


PRESS continue; 


327 




1 

3, 

the DUMP ROUTINE 

WILL halt again; now enter .the first word 

326 




1 


ADDRESS OF THE DATA AREA TO RE DUMPED AND PRESS CONTINEUE, 

329 





4, 

THE ROUTINE WILL HALT A THIRD TIME; FINALLY ENTER THE LAST 

330 




1 


WORD ADDRESS OF 

THE data area to be dumped and 

331 




) 


PRESS CONTlNUE f . 

DUMPING WILL NOW PROCEED IN ABSOLUTE 

332 




1 


FORMAT ON THE SELECTED DEVICE, 

333 




1 

5, 

WHEN DUMPING IS 

COMPLETE the routine will halt; 

334 




1 


IF FURTHER DUMPING IS DESIRED PROCEED TO STEP #3, IT IS 

335 




1 


NOT NECESSARY fo RE-RPECIFY THE DEVICE ADDRESS', 

336 




t 

6, 

TO PUNCH STOP CODE WHEN DUMP HAS BEEN 

337 




1 


COMPLETED, SFT BIT 0 OF SWITCH REGISTER*! AND 

338 




) 


press continue; 

THE DUMP ROUTINE WILL HALT, 

339 




l 


SET SWITCH REGISTER BIT 0*0 AND 

340 




1 


PRESS continue; 

THE DUMP ROUTINE WILL HALT, 

341 




1 


press continue; 

THE DUMP ROUTINE WILL PUNCH A STOP CODE 

342 




1 


AND then . halt; 

THE PAPER Tape PUNCH MAY NOW BE UNLOADED, 

343 




1 




344 

100610 

010706 



Mg v 

pC,SP 

I'SFT UP STACK 

345 

000612 

005766 



TST 

• ISP) 

1 ADDRESS 

346 

000614 

000000 



MALT 


/ENTER DEVICE ADDRESS 

347 

000616 

013700 

177570 


MOV 

P#SR i R0 


348 

000622 

010067 

000134 


MQV 

R0 i E , TCSR 

1 SET UP PS ADDRESS 

349 

000626 

C05200 



INC 

R0 


350 

000630 

005200 



INC 

R0 

1 GENERATE DATA ADDRESS 

351 

000632 

010067 

000132 


MQV 

R0.E.TDB 

1 SFT UP DATA ADDRESS 

352 

000636 

000000 


r, 0 « 

HALT 


1 ENTER START LOCATION TO R0 

353 

000660 

012703 

000760 


MOV 

#i;PUN|R3 


354 

000664 

013700 

177570 


MOV 

®#SR,R0 

1 St ART LOCATION TO R0 

355 

000650 

000000 



halt 


/ENTER ENDING LOCATION INTO SR 

356 

000652 

013701 

177570 


MQV 

«#SR,R1 

1 ENDING LOCATION To Rl 

357 

000656 

012702 

000010 


MOV 

#10, R2 

110 NUL FRAMES TO PUNCH 

358 

000642 

003005 



CLR 

R5 

|R5*CHECKSUM - 

359 

000664 

005004 



CLR 

R4 

1 R4*CONTA I NS FRAME TO PUNCH 

360 

000666 

003702 


E,Il 

TST 

R2 

/ALL DONE? 

361 

000670 

003403 



RLE 

E,2 

1 JUMP IF YES 

362 

000672 

004713 



USR 

PC,<R3> 

1 PUNCH ONE NULL FRAME 

363 

000674 

005302 



DEC 

R2 

|‘ DECREMENT FRAME COUNT 

364 

000676 

000773 



0R 

E,1 


365 

000700 

005204 


E,2l 

INC 

R 4 

l SET R4.1 

366 

§00702 

004713 



JSR 

PC, ( R3 ) 

1 PUNCH A START FRAME 

367 

000704 

005004 



CLR 

R4 

|R4*0 

368 

000706 

004713 



JSR 

PC, C R3> 

i PUNCH A HERO FRAME 

369 

000710 

010104 



MOV 

R1,R4 

/SAVE L'WA 

370 

100712 

160004 



SUB 

R0.R4 

|LWA*FWA 

37i 

000714 

062704 

000007 


ADD 

#7,R4 

1 CORRECT COUNT 

372 

000720 

004713 



JSR 

PC, (R3) 

1 PUNCH LOWER ORDER OF COUNT 

373 

000722 

000304 



SWAB 

R4 

/GET UPPER BYTE 
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374 

100724 

004713 



JSR 

PG,{R3J 

1 AND PUNCH IT 

375 

000726 

010004 



MOV 

R0,R4 

igft load address 

376 

000730 

004713 



JSR 

PG,(R3I 

1 AND PUNCH ITS LOWER ORDER 

377 

000732 

000304 



SWAB 

R4 

1 GET UPPER ORDER 

378 

000734 

004713 



JSR 

P0,{R3) 

1 AND PUNCH IT 

379 

900736 

020001 


E , 3 1 

CMP 

R0,R1 

/DONE PUNCHING DATA? 

380 

000740 

003003 



BGT 

E , 4 

I'BRANCH IF YES 

381 

000742 

112004 



MQVB 

(R0)*,R4 

/GFT A DATA BYTE 

382 

900744 

004713 



JSR 

P0,(R3> 

1 AND PUNCH IT 

383 

900746 

000773 



BR 

E, 3 


384 

000750 

005405 


e;*i 

NEG 

R5 

/NEGATE CHECKSUM 

385 

900752 

010504 



MOV 

R5.R4 


386 

000754 

004713 



JSR 

PC,(R3> 

/PUNCH CHECKSUM 

387 

000756 

000727 


i 

e;puni 

8R 

E,0 

I’AND GO BACK TO BEGINNING 

388 

309 

100760 

105737 

000000 

TSTB 

P#>, 

,*2 

/WAIT 

390 


000762 


e;tcsr 

* 


391 

000764 

100375 



BPL 

E, PUN 

/READY 

392 

000766 

110437 

000000 


MQVB 

R4,P#>, 

/PUNCH A FRAME 

393 


000770 


e;tdb 

1 

,*2 


394 

000772 

060405 


ADD 

R4.R5 

/ACCUMULATE CHECKSUM 

395 

900774 

000207 



RTS 

PQ 
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396 





397 



.SBTTL 

DEVICE 1 

398 


001020 


,■1020 

399 





400 

001020 

001034 

GETSWI 

dmyrts 

401 

9010^2 

001034 

PRIME 1 

OMYRTS 

402 

901094 

000000 


0 

403 

901096 

000000 

qvflagi 

0 

404 

901030 

000000 

LINKER 1 

0 

405 

901032 

000002 

OMVRTIi 

RTI 

406 

001034 

000207 

OM9RTSI 

RTS 

407 

408 



•sbttl 

GTP VAR 

409 





410 

001036 

004000 

x Count i 

4000 

411 





412 

001040 

000000 

PRFLAGI 

0 

413 

901042 

000000 

PASCMTi 

0 

414 

001044 

177777 

SRi 1 

•1 

415 

001046 

177777 

SR2 1 

■1 

416 

001050 

177777 

SR3I 

• 1 

417 

001052 

040000 

LOCOREI 

40000 

418 

901054 

000000 


0 

419 

901056 

000000 

HCoREI 

0 

420 

001060 

000000 

SQOPEFI 

0 

421 

001062 

000000 

CONFIGI 

0 

422 

901064 

014606 

RETURN! 

PROCTS 

423 

901066 

000000 

ACfFLGl 

0 

424 


001067 

3VFLG*ACTFLGn 

425 





426 



.sbttl 

DEVICE 

427 


001100 


, *1100 

428 



IKL’11 


429 





430 

0011F0 

177560 

trcsri 

177560 

431 

001102 

177562 

TR6RI 

177562 

432 

901104 

177564 

TTCSRJ 

177564 

433 

901106 

177566 

TTDBR! 

177566 

434 





435 



JPC11 


436 





437 

001110 

177550 

hrCsri 

177550 

438 

901112 

177552 

HRCjBRl 

177552 

439 

001114 

177554 

HPfiSR | 

177554 

440 

001116 

177556 

HPS8RI 

177556 

441 





442 



1 K W 1 1 *L 


443 





444 

001190 

177546 

LKCSRi 

177546 

445 





446 



ILPU 


447 





448 

001122 

177514 

LPCSR! 

177514 

449 

901124 

177516 

LPSBRI 

177516 


PC 


I SET UP by user FOR SWITCH REGISTER INPUTS 
I SET UP BY USER FOR DEVICE PRIMING 

I'OVEPlAY TO GTP COMMUNICATION WORD 
/OVERLAY LINKING POINTER 
I DUMMY RETURN FROM BACKGROUND OVERLAY 
I DUMMY RETURN FROM USER DODE 


/number OF iterations OF SUBTEST 
I TO PE EXECUTED 
I ERROR HANDLER IN USE FLAG 
I MUMPER OF PROGRAM PASSES 
/FIRST DEVICE SELECTION REGISTER 
/SECOND DEVICE SELECTION REGISTER 
iTHPD DEVICE SELECTION REGISTER 


j’uppfr l ImIt for core expansion 

/NUMBER OF ITERATIONS OF SUBTEST COMPLETED 

/PROCESSOR CONFIGURATION 

/CONTAINS ADDRESS OF LAST TEST COMPLETED 

/IF NOT B, PROGRAM UNDER EXTERNAL MONITOR CONTROL 

/IF NOT 0, PROGRAM RUNS IN QUICK VERIFY MODE 


/teletype reader control status register 
/TELETYPE reader data buffer 
/teleprinter control status register 
/teleprinter data buffer 


I HIGH SPEED READ STATUS REGISTER 
/HIGH speed READER DATA BUFFER 
I HIGH SPEED PUNCH CONTROL STATUS REGISTER 
/HIGH SPEED PUNCH DATA BUFFER 


jKWii«u line clock control status register 


JLPU LINE printer control status register 
JLPII LINE PRINTER DATA BUFFER 
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450 

451 

452 

453 

901126 

160770 

iDlillaA 
DR ACCS ! 

»o 

167770 

lORl|«A t DRll»C CONTROL STATUS REGISTER 

454 

901130 

167772 

dracob i 

167772 

1 0R11*C«DR11»C OUTPUT BUFFER 

455 

901132 

167774 

DR AC IB I 

167774 

/DRli*A ,DR11*C INPUT BUFFER 

456 

901134 

000000 

PRlVECi 

0 

/QRli*A,C INPUT INTERRUPT UEfeTOR 

457 

101136 

000000 

DRfLVLi 

0 

lQRllwA,C INPUT interrupt SERVICE level 

458 

901140 

000000 

OROVECi 

0 

iQ&ll.A.C OUTPUT INTERRUPT VECTOR 

459 

460 

461 

462 

463 

001142 

000000 

DROLVU 

0 

/ORllnA.C OUTPUT INTERRUPT SERVICE LEVEL 

901144 

177470 

JRFll 
RFSAE 1 

177470 

iRFli disk address and error 

464 

001146 

177472 

RF8BRI 

177472 

iRFii data buffer 

465 

001150 

177466 

RFgAR! 

177466 

IRFli disk address register 

466 

901152 

177462 

RFWCI 

177462 

jRfll WORD COUNT REGISTER 

467 

§01154 

177464 

RFCARI 

177464 

iRFli Current address register 

468 

§01156 

177460 

RFCSRI 

177460 

IRFli CONTROL STATUS REGISTER 

469 

470 

471 

472 

473 

§01160 

177461 

RFCSRHI 

177461 

/HIGH PVTE ADDRESS OR CSR 

§01162 

177440 

JR6U 
RCUA 1 

177440 

jRCll LOOK AHEAD REGISTER 
iRCii Bata buffer 

474 

§01164 

177456 

RCOBR! 

177496 

475 

§01166 

1774*2 

RC0AR! 

177442 

/RCli DISK ADDRESS REGISTER 

476 

§01170 

177450 

RCUCI 

177490 

/RCli word count register 

477 

§01172 

177452 

RC9ARI 

177492 

/RCli current address register 

478 

§01174 

177446 

RCCSRj 

177446 

/RCli CONTROL status register 

479 

§01176 

177447 

RCeSRHI 

177447 

1 HIGH BYTE ADDRESS OF CSR 

480 

481 

482 

483 

484 

485 

486 

487 

001200 

177420 

JQfll 

DTSSRli 

177420 

/bus switch control status register 

901202 

177416 

JRfUi 

rKSbri 

177416 

IRKll DATA- BUFFER 

488 

001204 

177412 

RK8ARI 

177412 

/RKlf DISK ADDRESS REGISTER 

489 

901206 

177413 

RK8AHI 

177413 

IRKll HIGH BVTE OF DISK ADDRESS 

490 

§01210 

177406 

RKUCI 

177406 

/ R K 1 1 WORD COUNT REGISTER 

491 

901212 

177410 

rkbari 

177410 

|R*li CURRENT ADDRESS REGISTER 

492 

901214 

177404 

RKfiSR 1 

177404 

I’RKli STATUS REGISTER 

493 

§01216 

177405 

RK8SRHI 

177405 

IRKll HIGH BYTE ADDRESS OF CSR 

494 

001220 

177400 

RK8SR! 

177400 

/RKli DRIVE STATUS REGISTER 

495 

496 

497 

498 

499 

§01222 

000000 

RK8RVI 

0 

IRKll DRIVE SELECTED FOR TEST 

§01224 

177304 

IKEII 
HQ 1 

177304 

/KEli MULTIPLIER-QUOTIENT REGISTER 

500 

901226 

177302 

ACi 

177302 

/ K E 1 i ACCUMULATOR 

501 

901230 

177310 

SC i 

177310 

1 KEli STEP COUNTER 

502 

001232 

177311 

SREI 

177311 

I KEli STATUS REGISTER 

503 

001234 

177306 

mul: i 

177306 

/KEli MULTIPLY 
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504 

*01236 

1773*0 

DIVI 

177300 

I'KFU 

DIVIDE 

5*5 

*012*0 

177312 

NOR I 

177312 

iKFlt 

NORMALIZE 

506 

*01242 

177314 

USM 1 

177314 

IKE 11 

LOGICAL SHIFT 

507 

*012*4 

177316 

AS£| 

177316 

IKE It 

ARITHMETIC SHIFT 

508 







509 



ITCH 




510 







Sii 

*012*6 

177342 

TCShI 

177342 

itch control and function register 

512 

*01250 

177340 

TCSTI 

177340 

I’TCli 

GENERAL STATUS REGISTER 

513 

*01252 

177330 

TCOTI 

177350 

I'TCll 

DATA BUFFER 

514 

*01294 

177344 

TCWC 1 

177344 

ITCH 

WORD COUNT REGISTER 

515 

*01236 

177346 

tcbai 

177346 

I'TCli 

BUS ADDRESS REGISTER 

316 

*01260 

000400 

TCSRVI 

400 

lOECtAPE DRIVE SELECTED FOR TEST 

517 







318 



iCRlli 

CMU 



519 







520 

101262 

177160 

CR9I 

177160 

/card 

reader PS REGISTER ADDdESS 

521 

*01264 

177162 

CR81I 

177162 

/CARD 

reader* CARO IMAGE DATA BUFFER 

522 

*012*6 

177164 

CR82I 

177164 

/CARD 

READER ENCODED DATA DUFFER 

523 







324 



1 can 




525 







526 

*01270 

172460 

CDsTI 

172460 

i'CDii control status register 

527 

*01272 

172462 

COCCI 

172462 

icnii 

COLUMN COUNT REGISTER 

528 

*01274 

172464 

CORA 1 

172464 

iCOll 

BUSS ADDRESS REGISTER 

329 







530 



IAS0HO 




531 







332 

*01276 

176772 

AQSBRI 

176772 

/ AD 01 • 

»B DATA BUFFER 

333 

*01300 

176770 

ADftSR 1 

176770 

/AO 01 « 

*0 CONTROL STATUS REGISTER 

534 

*01302 

176771 

AOfiSROI 

176771 

/HI GW 

BYTE OF CONTROL STATUS RFGISTE 

535 







536 



IRP11 




537 

538 

*01304- 

176722 

RpCAl 

176722 

/ R P 1 1 

CYLINDER ADDRESS D ! Sk 

539 

*01306 

176729 

RP6AW! 

176725 

iRFll 

HIGH BYTE OF DISK ADDRESS 

540 

*01310 

176710 

RPSSRI 

176710 

4 R p 1 1 

DRIVE STATUS register 

541 

*01312 

176724 

RP6ARI 

176724 

/RPli 

DISK ADDRESS REGISTER 

542 

*01314 

176716 

RPWCI 

176716 

/RPli 

word count register 

543 

*01316 

176720 

RPIARI 

176720 

/RPli 

CURRENT ADDRESS REGISTER 

544 

*01320 

176714 

RPCSRI 

176714 

/RPli 

status register 

545 

*01322 

176715 

RPCSRHI 

176715 

/RPli 

HIGH BYTE ADDRESS O'F CSR 

546 







547 



1 A All 




348 







549 

*01324 

176736 

SCSRI 

176756 

/ AAii 

STATUS REGISTER 

550 

*01326 

176760 

D A ft 0 1 

176760 

/ AAil 

* register 

551 

*01330 

176762 

PAfcll 

176762 

1 AAii 

y register 

552 







553 



lONll 




554 







555 

*01332 

175200 

PNftSR I 

175200 

1 DM13 

Control status register 

556 

*01334 

000340 

DNVECI 

340 

/ONli 

INTERRUPT VECTOR 

557 

*01336 

000342 

onLvli 

342 

ID Nil 

priority 
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558 







559 



lONll 




560 







561 

*01340 

173000 

bmSsr i 

175000 

iDmu 

control status register 

562 

*01342 

173002 

OMBARI 

175002 

iDMli 

BUS ADDRESS REGISTER 

563 

*01344 

179004 

OMBRKI 

175004 

lOMli 

BREAK STATUS REGISTER 

564 

*01346 

179006 

DMgASI 

175006 

lOHli 

BASE REGISTER 

565 

*01330 

000330 

DHRVECi 

330 

IDMli 

RECEIVER VECTOR ADDRESS 

566 

*01332 

000332 

DMRPRTYI 

! 332 

IDMli 

RECEIVER SERVICE LEVEL 

567 

*01334 

000334 

OMtVECf 

334 

IDMli 

transmitter vector address 

568 

*01336 

000336 

OMfPRTYl 

1 336 

lOMli 

transmitter service level 

569 







5*0 



10*11 




571 







5*2 

*01360 

174770 

OpRSI 

174770 

/Dpli 

receiver status register 

573 

*01362 

174772 

DPRBI 

174772 

i D P 1 1 

RECEIVER DATA BUFFER 

574 

*01364 

174774 

DPfSl 

174774 

/DPI! 

transmitter status register 

575 

*01366 

174776 

OPfBl 

174776 

/DPI! 

transmitter data buffer 

576 

*01370 

174773 

DPSYNCI 

174773 

/DPll 

SYNC BUFFER 

577 

*01372 

174777 

OPeSYNi 

174777 

/DPti 

EXTENDED SYNC BUFFER 

57b 

*01374 

000320 

DPR I V | 

320 

/DPI! 

receiver interrupt vector 

579 

*01376 

000322 

DPRPI 

322 

/DPll 

RECEIVER PRIORITY 

580 

*01400 

000324 

DPtIVl 

324 

/DPI! 

transmitter Interrupt vector 

581 

*01402 

000326 

DPfPl 

326 

/DPll 

transmitter priority 

582 







563 



1 DSll #1 



584 







585 

*01404 

174004 

net csr i 

174004 

lOfili 

#i transmitter status register 

586 

*01406 

174006 

OCTOBRI 

174006 

iDCii 

#1 transmitter data rufffr 

587 

*01410 

174000 

OCRCSRi 

174000 

iDCli 

H RECEIVER STATUS REGISTER 

588 

ft AO 

*01412 

174002 

OCRDBRI 

174002 

ioeii 

* 1 RECEIVER DATA 8UFFEP 

Pov 

590 



J DSll #2 



59i 







592 

*01414 

174010 

DC8SRI 

174010 

/ d ft a i 

#2 receiver status register 

593 

*01416 

174012 

dcrbri 

174012 

iDCii 

P2 receiver data buffer 

594 

*01420 

174014 

DCfCSAi 

174014 

/ o ft i i 

#2 transmitter status register 

595 

*01422 

174016 

DCf DBA 1 

174016 

/ d ft l i 

#2 TRANSMITTER DATA BUFFER 

596 







597 



JAFCll 




598 







599 

*01424 

172570 

AFCSRI 

172970 

1 A F C i 1 CONTROL STATUS REGISTER 

600 

*01426 

172572 

AFSBRl 

172572 

/ A F C 1 1 DATA BUFFER 

601 

*01430 

172574 

A F ft A R | 

172574 

I’AFCll CHANNEL ADDRESS REGISTER 

602 







603 



ITMli 




604 







605 

*01432 

172520 

mTS» 

172520 

iTMli 

status register 

606 

*01434 

172522 

MTftl 

172522 

iTHl! 

command register 

607 

*01436 

172524 

MTBCI 

172524 

iTMli 

byte COUNT REGISTER 

608 

*01440 

172526 

MTCAl 

172526 

ITMli 

current address register 

609 
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612 

*01442 

172540 

KWCSRI 

172540 

lKWli*P CONTROL REGISTER 

613 

*01444 

172542 

KWftSBI 

172542 

l'KWll*P COUNT SET BUFFER 

614 

*01446 

172544 

KWCTRI 

172544 

iKWii.P COUNTER RUFFER 

615 






^ 616 



|ORll«B 



617 






& 618 

*01450 

172416 

ORtfBRI 

172416 

I'QPllwR DATA BUFFER 

619 

*01452 

172414 

DRSTI 

172414 

l“DPli*»B 'CONTROL STATUS REGISTER 

620 

*01454 

172412 

PRF3 A 1 

172412 

1 QR114B BUS ADDRESS REGISTER 

621 

*01456 

172410 

QRWCI 

172410 

j'BRli-B WORD COUNT REGISTER 

622 






623 



lUfiCU 



624 






625 

*01460 

171776 

U 0 ft R 1 

171776 

lUDCll CONTROL REGISTER 

626 

*01462 

171774 

UDSRI 

171774 

l'UDCl.1 STATUS REGISTER 

627 






628 



JKG11 



629 






630 

*01464 

170700 

KGCSP 1 

170700 

i'kguha control status register 

631 

*01466 

170702 

KGBCCl 

170702 

j'KGllw A BCC REGISTER 

632 

*01470 

170704 

KG6BRI 

170704 

iKGli^A DATA BUFFER 

633 






634 



1 BlJS TESTER SECTION 1 


635 






636 

*01472 

170000 

ABtJBRJ 

170000 

1 B 0 S TESTER #1 DATA BUFFER 

637 

*01474 

170002 

A B ft A 1 

170002 

1 BUS TESTER #1 CURRENT ADDRESS REGISTER 

638 

*01476 

170004 

A8WCI 

170004 

i BUS TESTER #1 WORD COUNT REGISTER 

639 

*01500 

170006 

ABfiSRI 

170006 

1 BUS TESTER n CONTROL STATUS REGISTER 

640 






641 

£ A o 



) BUS TESTER SECTION 2 


643 

*01502 

170010 

bbdbri 

170010 

I BUS TESTER #2 DATA BUFFER 

644 

001504 

170012 

BBCAI 

170012 

1 BUS TESTER #2 CURRENT ADDRESS REGISTER 

645 

001506 

170014 

BBWCI 

170014 

1 BUS TESTER #2 WORD COUNT REGISTER 

646 

001510- 

170016 

BBCSRI 

170016 

1 BUS TESTER #2 CONTROL STATUS REGISTER 

647 






648 



I BUS TESTER SECTIONS 


649 






650 

001512 

170020 

CBQBRI 

170020 

I BOS TESTER #3 DATA BUFFER 

651 

001514 

170022 

CBftA 1 

170022 

/BUS TESTER #3 CURRENT ADDRESS REGISTER 

652 

001516 

170024 

CBWCI 

170024 

/BUS TESTER #3 WORD COUNT REGISTER 

653 

001520 

170026 

CBCSRI 

170026 

/BUS TESTER #3 CONTROL STATUS REGISTER 

654 






655 



1 BUS TESTER SECTION 4 


656 






657 

001522 

170030 

08QBR 1 

170030 

/BUS TESTER #4 DATA BUFFER 

658 

001524 

170032 

OBCAI 

170032 

/BUS TESTER #4 CURRENT ADDRESS REGISTER 

659 

001526 

170034 

DBWCI 

170034 

/BUS TESTER #4 WORD COUNT REGISTER 

660 

001530 

170036 

DBCSRJ 

170036 

/BUS TESTER #4 CONTROL STATUS REGISTER 

661 






662 



»0m11*9B 



663 






664 

001532 

170500 

DMBCSRI 

170500 

/QMliwRB CONTROL STATUS REGISTER 

665 

001534 

170502 

OMBLSRI 

170502 

iOH11*RB line status register* 


GENERAL TEST PROGRAM 

HACUli 624 
REGISTER AND 

24bQCT;73 20120 PAGE 15 



DZQGAC.Pil 

DEVICE 

VECTOR TABLE 



666 *01536 

000350 


OMBVECi 350 

/QMll-PB 

INTERRUPT VECTOR 

667 *01540 

000352 


OMBLVLi 352 

lOMll-BB 

PRIORITY 


c 
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668 

669 

670 





, S0TTL 

PROGRAM INITIALIZATION 


001542 

012706 

036520 


BEGInII 

MOV 

ASTACKiSP 

1 SET up PRqCESSqp STACK 

671 

001546 

012767 

035514 

176250 


MOV 

ARP A I Li 24 

1 SET UP POWER FAIL SERVICE POINTER 

672 

001554 

005067 

034010 



CLR 

PFFLAG 

1 CLEAR POWER FAIL FLAG 

673 

001560 

005067 

177056 



CLR 

PASCNT 

J CLEAR PASS COUNT 

674 

001564 

005067 

033720 



CI.R 

ISFLC 

1 CUE AR ISOLATION FLAG 

675 

676 

677 

678 

679 

001570 

005067 

032534 



CLR 

PASCT 

ICOUNT FOR PASS PARAMETERS 





JDETERMINE PROCESSOR type, AMO PROCESSOR OPTIONS 

901574 

012737 

000004 

000006 


MOV 

A4| PA6 


680 

901602 

012737 

000002 

000006 


MQV 

ARtI,9A6 

1 SET UP TO RETURN FROM 

661 







1 BUS ERROR TRAP 

682 

001610 

012700 

000003 



MQV 

A3|R0 

DETERMINE PROCESSOR TYPE 

683 

901614 

000261 

176150 



SEC 


1 SET C BIT 

684 

901616 

005777 



TST 

APIRQ 

1 I F P J RQ EXISTS, PROCESSOR 

685 








US PQP"11/45| NO TRAP 

666 

901632 

005600 




SBC 

R0 

IIP TRAP OCCUREQ, t .PIT NOT CLEARED 

687 

901624 

000261 




SEC 


I SET C BIT 

668 

001626 

105737 

177777 



TSTB 

9APSA1 

J IF PROCESSOR IS POP;it/40 

689 

901632 

005600 




SBC 

R0 

I OR 11/45, C BIT WILL RE CLEARED 

690 

001634 

005037 

177700 



CLR 

•#177700 

IIP PROCESSOR IS NOT PDP*lt/l0 

691 








IA TRAP WILL OCCUR 

692 






IR0P3, 

PROCESSOR IS PDF»il>45 


693 






!R0i2i 

PROCESSOR IS PDPi*il/40 


694 






1 RSSili 

PROCESSOR IS PDP»ll/>2* 


695 

696 

697 






JR0*0, 

PROCESSOR IS PDP«il?10 


001640 

012737 

000006 

000004 


MQV 

#6| #A4 

irestqre TRAPCATCHeR 

698 

001646 

005037 

000006 



CLR 

i#6 


699 

001652 

010067 

177204 



MOV 

R0, CONFIG 

ISAVE PROCESSOR TYPE 

700 

901656 

012737 

001674 

000010 


MQV 

#1S,##10 

J SET UP ILLEGAL INSTRUCTION TRAP 

701 

001664 

070100 




Mill 

. R0,R! 

1 EXECUTE MULTIPLY INSTRUCTION 

702 

901666 

152767 

000001 

177167 


8 1 SB 

All CONF I G+l 

1 SET E IS BIT IN PROCESSOR DESCRIPTOR WORD 

703 

901674 

012737 

001726 

000010 

111 

MQV 

A 2 $ i • A 1 0 

J SET UP NEW ILLEGAL INSTRUCTION TRAP 

704 

001702 

012701 

036322 



MOV 

astackk,ri 

J SET UP STACK FOR FIS 

705 

901706 

005041 




CLR 

MR!) 


706 

901710 

005041 




CLR 

• C R1 > 


707 

001712 

005041 




CLR 

■ { R1 > 


708 

901714 

005041 




CLR 

•1R1) 


709 

901716 

075001 




TA0D* 

Rt 

1 EXECUTE FIS INSTRUCTION 

7ie 

001720 

152767 

000002 

177135 


8 1 SB 

#2 , CONF I G*1 

I SET FIS BIT IN PROCESSOR DESCRIPTOR 

711 

901726 

012737 

001760 

000010 

2Si 

MQV 

#3S , *>#10 

j set up illegal instruction trap 

712 

001734 

170000 




CFCC 


JEXECUTE 11/45 FPP INSTRUCTION 

713 

001736 

152767 

000004 

177117 


8 I SB 

#4 , CONF I G*1 

J SET 11/45 FPP BIT IN PROCESSOR DESCRIPTOR 

714 

001744 

012777 

036056 

034150 


MQV 

AF’LTERR i ®FPVECf 

1 LOAD INfERUPT VECTOR 

715 

901752 

012777 

000000 

034144 


MOV 

A0,PFPVECT*2 


716 

001760 

012737 

000012 

000010 

3$i 

MOV 

#12, ##10 

J RESTORE TRAPCATCHER 

717 

001766 

012737 

002006 

000004 


MOV 

A4S,»A4 

1 SET UP BUS ERROR TRAP 

718 

001774 

005767 

175572 



TST 

SSR0 

J TEST FOR MEMORY MANAGEMENT 

719 

002000 

152767 

000010 

177055 


R I SB 

#10 i CONF I G*1 

1 SET MEMORY MANAGEMENT 

720 

002006 

01273 7 

000006 

000004 

4$i 

MQV 

#6,8»#4 

IBIT IN PROCESSOR DESCRIPTOR 

721 

002014 

032767 

000002 

177040 


BIT 

#2 , CONF I G 

J IF PDP-11/40.OR 45 
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722 

902022 

901403 




SEG 

START 

1 USE RTT FOR trace Trap RETURN 

723 

902024 

012767 

000006 

031756 


MOV 

#RTT,TRTRET 

724 

902032 

012767 

000001 

002450 

STaRTI 

MOV 

#1,BDATA1 

ISET up BASE DAtA FOR TTY READER OR KEYBOARD 

725 

902040 

005067 

002474 



CLR 

BDATA2 

1 SET UP BASE DATA FOR TTY PUNCH OR TELEPRINTER 

726 

902044 

012767 

000001 

002532 


MQV 

#1 , DAT A3 

ISET UP BASE DAtA FOP HSR 

727 

9102052 

005067 

002622 



CLR 

0ATA4 

ISET UP BASE DAtA FOR MSP 

728 

902056 

005767 

175760 



TST 

42 

1 IF 42 NOT 0, ACUl OR DDP 

729 

902062 

001433 




REQ 

SETSW 

730 

902064 

022767 

033506 

175750 


CMP 

4LOGICAL.42 

IIF(42lfL06iCAL, ACTll 

731 

902072 

001411 




9EQ 

I* 


732 

902074 

016767 

175742 

176754 


MQV 

42.HC0RE 

ISET LIMITS FOR CORE EXPANSION 

733 

902l«2 

162767 

000200 

176746 


SUB 

#200 , HCQRE 


734 

902110 

004767 

034470 



JSR 

PC, SUER 

1 GET SYSTEM CONFIGURATION 

735 

902114 

000474 




BR 

BEGJN4 

1 CO To RUN 

736 

90?116 

105747 

176744 


ISi 

TSTB 

AGTFLG 

nr ACTll, GET SYSTEM CONFIGURATION 

737 

902122 

001054 




BNE 

CORTSl 


738 

902124 

004767 

034454 



JSR 

PC, SIZER 

JDETERMINE WHAT DEVICES ARE PRESENT 

739 

302130 

105167 

176732 



COMB 

actflg 


740 

902134 

022767 

177777 

031346 


CMP 

#«i,L00ICAl*2 

J IS THIS PASS QUICK VERIFY 

741 

902142 

001044 




BNE 

CORTSl 

IBRANCH IF NO 

742 

902144 

105167 

176717 



COMB 

qvflg 

ISET QV FLAG 

743 

902150 

000441 



SEfSWl 

BR 

CORTSl 


744 

902152 

005767 

175412 


TST 

SR 

1 IF SWRb0, USE PREVIOUS 

745 

746 

747 

748 

749 

750 

902156 

901415 




8EQ 

CORTST 

IDEVICE SELECTION, 
JDETERMINE SIZE OF MEMORY 






1 INPUT DEVICE SELECTION From 

switch register 

902160 

016767 

175404 

176656 

SWITCH j 

MQV 

SR, SRI 

ISAVE 1ST SWITCH REGISTER 

751 

902166 

000000 




halt 


ISET SWITCH FOR 2ND SET 

752 

902170 

016767 

175374 

176650 


MQV 

SR,SR2 

ISAVE 2N0 SWITCHES 

753 

902176 

009000 




HALT 


1 GET SWITCHES FOR THIRD SET 

754 

102200 

016767 

175364 

176642 


MQV 

SR,SR3 

J SAVE THIRD SWITCHES 

755 

756 

757 

758 

759 

902206 

004777 

176606 



JSR 

pc.pgetsw 

IGO TO USER OVERLAY FOR 






1 SET 

UP MEMORY expansion test 

Lower limit 

102212 

012767 

040000 

176632 

CORTSTI 

MOV 

#40000, tOCORE 

JSTART OF 12K 

760 

102220 

022767 

001034 

176574 


CMP 

#DMYRTS, PRIME 

1 I F A FOREGROUND OVERLAY MAS BEEN 

761 

102226 

001403 




BEQ 

cqrtsb 

1 LOADED 

762 

902230 

062767 

020000 

176614 


ADD 

#20000, LOCORE 

ISTART CORE EXPANSION IN NEXT 4K 

763 

102236 

022767 

001032 

175554 

CORTSBi 

CMP 

iOMYRTI, IOTVEC 

I I F A BACKGROUND OVERLAY 

764 

102244 

001403 




BE0 

,*10 

i h as been Loaded 

765 

766 

767 

768 

769 

902246 

062767 

020000 

176576 


ADD 

#20000, LOCORE 

ISTART CORE EXPANSION 






ifino 

OUT HOW MUCH MEMORY fS 

AVAILABLE 

102254 

005067 

176576 


CORTSl! 

?lr 

HCQRE 

JClEAR CORE LIMIT 

770 

902260 

016700 

176566 



MOV 

LOCORE,R0 

77i 

902264 

012767 

002276 

175512 


MQV 

#1$,4 

ISET UP RETURN FOR TIME OUT TRAP 

772 

902272 

005720 




TST 

<R0>* 

JINCREMENT TILL OUT OF MEMORY 

773 

902274 

000776 



IS t 

BR 

,»2 

{TRAP WHEN OUT Of MEMORY 

774 

902276 

162700 

001000 


SUB 

#1000, R0 

IDO MOT TEST INTO COPE ABOVE STAPT OF LOADER 

775 

102302 

010067 

176550 



MQV 

R0.HCORE 

1 HIGHEST CORE TO BE TESTED 
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776 

*02306 

012767 

000006 

17*470 

BEGI N4 1 

MOV 

#6,4 

irestore TImE out trap 

777 

*02314 

*16701 

176542 



MQV 

CONFIG, R1 

) GET PROCESSOR CONFIGURATION 

778 

*02 320 

006301 




A$l 

R1 


779 

*02322 

042701 

177770 



B IC 

#177770, Rl 


780 

*02326 

016167 

034332 

031770 


MOV 

pastab(R1),paSpar 

1 GET PASS PARAMETER TABLE 

781 

*02334 

016167 

034342 

031764 


MOV 

EXITCT(RI) jPASEX 


782 

*02342 

005767 

175474 


RUNSWl 

TST 

42 


783 

*023 4 6 

001001 




RNF 

ST 


784 

*023*0 

000000 




HALT 



785 

*023*2 

000005 



STi 

RESET 


J PROGRAM ALSO RESTARTS HERE 

786 

*023*4 

*12706 

036520 



MQV 

#stack,sp 

J SET UP PROCESSOR STACK 

787 

*023*0 

312767 

000340 

175410 


MOV 

#340, PS 

j lock out interrupts 

788 

*023*6 

032767 

000001 

176450 


PIT 

#1,SR1 

ME SRI BIT 1 = 1, DO WOT 

789 

*02374 

001026 




BNE 

sta 

JREQUEST BUS SWITCH 

790 

*02376 

032777 

020000 

176574 


PIT 

#20000, 9>DTCSR1 

1 W A I T FOR SWITCH TO nE RELEASED 

791 

*02404 

001374 




BNE 

, *6 


792 

*02406 

012777 

000001 

176564 


MOV 

#1 , PDTCSRl 

JREQUEST BUS SWITCH 

793 

*02414 

105777 

176560 



TSTB 

POTCSRl 

IWAIT TOR CONNECT 

794 

*02420 

100375 




PPL 

.*4 


795 

*02422 

005067 

033176 



CLR 

TEMP 

J DELAY FOR 

796 

*02426 

005267 

033172 



INC 

TEMP 

J BUS TESTERS 

797 

*02432 

001375 




BNE 

1 *4 


798 

*02434 

052777 

001000 

176536 


B I S 

#1000,flDTcSRi 

J ISSUE SWITCHED BUS !NlT 

799 

*02442 

032777 

001000 

176530 


BIT 

#l000,frD'Tc5Ri 

IWAIT FOR BUS INIT TO CLEAR 

85*0 

*02450 

001374 




BNE 

1 *6 


801 

*024*2 

3127*6 

036520 


STAI 

MOV 

#ST ACK , S p 

J SET UP STACK POINTER 

802 

*024*6 

00*067 

1763*6 



CLR 

PRFLAG 

JCLEAR ERROR routine in USE flag 

803 

804 





i S8TTL 

DEVICE 

initialization 


805 





HP INHIBIT SWITCH FOR DEVICE*!'. DO 

not INITIALIZE that DEVICE 

806 









807 

*024*2 

016701 

176356 



MOV 

SRliRl 

jput Inhibit switcher In 

808 

*024*6 

0167*2 

1763*4 



MOV 

SR2.R2 

igeneral registers for 

809 

*02472 

*12703 

0001*0 



MQV 

#100, R3 

JFASTER ACCESS 

810 

*02476 

0127*4 

000101 



MOV 

#101, R4 


811 

*02502 

030227 

000020 



BIT 

R2 , #20 

J I F SR2 BIT 4 = 1, DO NOT 

812 

*02506 

0010*2 




BNE 

ST00 

UNITIALIZE RK11 DISK 

813 









814 






IRK11 

disk controller Initialisation 

815 









816 

*02510 

016777 

176506 

176466 


MOV 

RKDRV,®rK0Ar 

JSET DISK ADDRESS To 0 

817 

*02516 

105777 

176476 



TSTB 

9RKDSR 

IWAIT FOR DRIVE READY 

818 

*02522 

100375 




PPL 

, «4 


819 

*02524 

105777 

176464 



TSTB 

0RKCSR 

IWAIT FOR CONTROL REaDV 

620 

*02530 

100375 




PPL 

1 *4 


821 

*02532 

*12777 

000015 

176454 


MQV 

#15,j*rkcsr 

J RESET DRIVE 

822 

*025*0 

105777 

176450 



TSTB 

(JsRKCSR 

IWAIT FOR READY 

823 

*02544 

100375 




BPL 

• * 4 


824 

*02546 

032777 

000100 

176444 


PIT 

#!00,5>RKOSR 

ITEST ACESS READY 

825 

*025*4 

001774 




PEG 

,«6 

IWAIT FOR ACCESS READY BIT 

626 

*025*6 

*12777 

000001 

176430 


MOV 

#1,0RKCSR 

1 CLEAR CONTROL 

827 

*025*4 

105777 

176424 



TSTB 

9RKCSR 

IWAIT FOR READY ; 

828 

*02570 

100375 




PPL 

• *4 


829 

*02572 

016777 

176424 

176404 


MOV 

RKORVj^RKQAR 
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test program 
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DZQGAC', PU 

DEVICE 

initial! 

ZATIQN 






830 

*026*0 

*12767 

043503 

004376 


MOV 

#43503, RKFUMCTlON 

JSET UP DISK FUNCTION 


831 








JWRITE IN LOW BYTE 


832 








JWPITE CHECK IN HIGH BYTE 


833 

*026*6 

*16777 

004730 

176376 


MQV 

LLIMIT|0RKBar 

1 SET UP ADDRESS OF 


834 








IWRITE/WRITE CHECK BUFFER 


835 

*02614 

016777 

004366 

176366 


MOV 

RKWQRDCT,0RKWC 

1 SET UP WORDCOUNT 


836 

*02622 

*12777 

0001*3 

176364 


MQV 

#103,PRKCSR 

1 SET INTERRUPT ENABLE, 


837 








JWRITE FUNCTION, GO 


638 

*02630 

*05067 

030174 



CLR 

WATCRK 

1 CLEAR INTERRUPT OCCURED FLAG 


839 

*02634 

*327*2 

000400 


ST00I 

BIT 

#400 , R2 

IIP SR2 BIT 8=1, DO NOT 


840 

*02640 

001032 




BNE 

ST01 

UNITIALIZE RPH DISK 


841 










842 






IRPU 

disk pack controller 

initialization 


643 










844 

*02642 

*127*7 

043503 

004442 


MQV 

#43503, RPFUnCTTow 

iset up disk function 


845 








i write in low byte 


346 








JWRITE CHECK IN HIGH BYTE 


847 

*026*0 

016777 

004666 

176440 

RP8l 

MQV 

LLIM!T,0RPBAR 

ISET UP ADDRESS OF 


848 








JWRITE/CRIT CHECK BUFFER 


849 

*026*6 

*16777 

004426 

176430 


MQV 

RPWQRDCT , 0RPWC 

JSET UP WORDCOUNT 


850 

*02664 

105777 

176430 



TSTB 

aRPCSR 

IWAIT FOR CONTROLLER READY 


851 

*02670 

100375 




BPL 

• *4 



852 

*02672 

*12777 

000015 

176420 


MOV 

#15,#>RPCSR 

IRESET DRIVE 


853 

*027*0 

105777 

176414 



TSTB 

0RPCSR 

IWAIT FQR CONTROLLER READY 


854 

*027*4 

100375 




BPt 

, *4 



855 

*027*6 

005777 

176376 



TST 

»RPQSR 

IWAIT for access ready 


856 

*02712 

100375 




BPL 

1 *4 



857 

*02714 

*05077 

176370 



CLR 

9RPDSR 

1 CLR ATTENTION 


858 

*02720 

012777 

000103 

176372 


MQV 

#103 1 0RPCSR 

JSET INTERRUPT ENABLE 


859 








JWRITE FUNCTION 


860 

*02726 

030127 

040000 


ST01I 

BIT 

Rl, #40000 

1 IF SRI BIT 14 = 1, DO NOT 


861 

*02732 

*010*2 




BNE 

STi 

unitialize teletype punch and 

PR 

862 










663 






ik l u 

TELETYPE TRANSMITTER 

initialization 


864 










865 

*02734 

050377 

176144 



BIS 

r3,*TTCsR 

j Initialize teletype punch and 

PR 

866 

*02740 

030127 

100000 


ST£ l 

BIT 

Rl, #10*000 

J IF SRI BIT 15=1. DO NOT INITIAL!; 

867 

*02744 

0010*2 




BNE 

ST2 

iteletype reader 


868 










869 

870 






IKLU 

teletype receiver Initialization 


871 

*02746 

050477 

176126 



BIS 

R4,0TRCSR 

unitialize teletype reader 


872 

*027*2 

030127 

000004 


ST2l 

BIT 

Rl,#4 

1 IF SRI bit 2 = 1, Do NOT 


873 

*027*6 

*010*2 




BNE 

S T 3 

unitialize high speed punch 


874 










675 






jpcn 

HIGH SPEED PUNCH INITIALIZATION 


876 










877 

*027*0 

*50377 

176130 



BIS 

R3 , PHpCSR 

IInITIAlIZE HIGH SPEED PUNCH 


878 

*02764 

030127 

000010 


ST3I 

BIT 

Rl , #10 

J IF SRI BIT 3=1, Do mot 


879 

*027 70 

*010*2 




BNE 

ST4 A 

unitialize high speed reader 


880 










881 






1 pen 

high speed reader initialization 


882 










883 

*02772 

050477 

176112 



BIS 

R4, SSMrCSR 

IInITIAlIZE HIGH SpEFD READER 
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684 

102776 

082701 

000020 


ST4AI 

BIT 

#20, PI 

MF SRI BIT 4*1, DO MOT 

885 

686 

887 

888 
889 

903002 

001004 




BNE 

S T 5 

unitialize kwu»l line clock 






ikwii*l real time c lo ck Initialization 

903004 

090377 

176U0 



bis 

R3.PIKCSR 

UnITIAl'IZE i InE CLOCK 

690 

903010 

005067 

027462 



CL« 

WATCKl 

1 CLEAR INTERRUPT OCCURED FLAG' 

891 

003014 

032701 

002000 


ST8I 

BIT 

#2000 , R1 

: IIF SRI BIT 12*1 , 00 NOT 

892 

893 

894 

895 
696 

903020 

001020 




BNE 

ST6 

UNITIALIZE RFU DISK 






IRP11 

disk controller Initial ization 

903022 

012767 

043903 

004510 


MOV 

#43503, FUNCTION 

1 set UP DISK FUNCTION 

897 








JWRITE IN LOW BYTE, 

698 








J WR I T E CHECK IN HIGH BYTE 

899 

003030 

105277 

176124 


RP8» 

I NCB 

PRFCSRH 

) ABORT ALL CURRENT DISK FUNCTIONS 

900 

903034 

016777 

004904 

176U0 


MQV 

WOROCT , pRpWc 

I SET UP WORD COUNT 

901 

003042 

016777 

004474 

176104 


MQV 

LLIMIT,PRFCAR 

/ SET UP ADDRESS of write/write CHECK BUFFER 

902 

903090 

116777 

004464 

176100 


MQVS 

FUNCTION, PRPCSR 

/start writing data to disk 

903 

003096 

005067 

027996 



CLP 

WATCRF 

1 CLEAR INTERRUPT OCCURED FLAG 

904 

003062 

030103 



ST6I 

BIT 

R1,R3 

UF SRI BIT 6*1, DO NOT 

905 

906 

907 

908 

909 

003064 

001012 




BNE 

ST7 

UNITIALIZE KWll«P programmable clock 






|KWll«P PROGRAMMABLE CL'oftK 

initialization 

903066 

012777 

001790 

176350 


MOV 

#1000’, , PKwCSB 

isEt clock counter f 0 r 

910 

003074 







11000 < DECIMAL 6 COUNTS 

9ii 

012777 

000101 

176340 


MOV 

#101,PKWCSR 

JSTAPT COUNTER At 100KHZ 

912 








IRATE, INTERRUPT WHEN COUNTER 

913 








I GOES TO 0 (AFTER 10 MS) 

914 

003102 

005067 

00924g 



CLP 

kwrate 

/NEXT COUNT RATE WILL BE 10 KHZ 

915 

003106 

005067 

027410 



CLP 

WATCKP 

1 CLEAR INTERRUPT OCCURED FLAG 

916 

003112 

030127 

000200 


STf 1 

BIT 

Rl, #200 

UF SRI BIT 7*1, DO NOT 

917 

918 

919 

920 

921 

003116 

001015 




BNE 

STB 

UNITIALIZE LPli LINE PRINTER 






ILPU 

line printer controller Initialization 

003120 

012767 

000040 

007020 


MOV 

#40 , SqLP a T 

IFIRST CHARACTER To BE 

922 

003126 







/PRINTED IS A SPACE 

923 

005067 

007016 



clr 

CLINCT 

/clear cloumn count 

924 

003132 

012737 

012000 

000200 


MQV 

#LPINTR,##200 

/SET UP INTERRUPT SERVICE VECTOR 

925 

003140 

012737 

000200 

000202 


MOV 

#200, ##202 

/SERVICE AT PRIORITY LEVEL 5 

926 

003146 

010377 

175790 



MOV 

R3.PLPCSR 

/SET INTERRUPT ENABLE 

927 

003192 

030127 

000400 


ST8I 

BIT 

Rl,#400 

J I F SRI BIT 8*1, DO NOT 

928 

929 

930 

931 

003196 

001026 




BNE 

ST9 

UNITIALIZE BUS TESTER 
/SECTIONS 1 AND 2 






1 BUS ' 

TESTER SECTIONS 1 AND 

2 INITIALIZATION 

932 







933 

003160 

012777 

000002 

176310 


MQV 

#2,s»abwc 

/set up section i For 2 byte transfer 

934 








J DEV ICE WILL SHIFT WORD FOUND 

935 








/AT BUS ADDRESS 1 PLACE LEFT 

936 

003166 

012777 

014096 

176300 


MOV 

#REC1A,»AbCa 

/SET UP BUS ADDRESS OF DATA 

937 

003174 

005067 

010656 



CLP 

REC1A 

/CLEAR TEST LOCATION 
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938 

003200 

005067 

010650 



clr 

sendia 

/CLEAR pattern to be transmitted 

939 

003204 

005067 

010650 



clr 

EXP1A 

/CLEAR EXPECTED RESULT 

940 

003210 

012777 

045511 

174262 


MOV 

#45511 1 PAbCSR 

/SET UP SECTION i FOR 

941 








/NPRi DATIP-DATAOi 

942 








/INTERRUPT ON LEVEL 6 

943 

003216 







JIMS DELAY BETWEEN INTERRUPTS 

944 

012777 

000173 

176264 


MOV 

#173,PBBCSR 

J SET UP SECTION 2 FOP 

945 








/INTERRUPT ON LEVEL 7 

946 

003224 

005067 

027314 





J1 00 US DELAY BETWEEN INTERRUPTS 

947 



CLR 

WATCAB 

/CLEAR BUS TESTER SECTION 

948 

003230 

005067 

027324 





/I INTERRUPT OCCURRED FLAG 

949 



CLR 

watcbb 

/CLEAR BUS TESTER SECTION 2 

950 

003234 







/INTERRUPT OCCURED FLAG 

951 

030127 

001000 


ST9I 

BIT 

P1i#1000 

UF SRI BIT 9*1 , DO NOT 

912 

003240 

001020 




SNE 

ST10 

/initialize bus tester 

953 








/SECTIONS 3 AND 4 

954 








955 

956 
9ft 






/BUS 

TESTER SECTIONS 3 AND 4 

initialization 

003242 

012777 

000200 

176246 


MQV 

#200 < PCBWC 

/ set up section 3 

958 

003250 







/FOR 200 WORD TRANSFER 

919 

012777 

014240 

176236 


MQV 

#CB8UF,PCBCA 

/SET UP BUS ADDRESS OF DATA 

960 

003256 

012777 

052619 

176234 


MOV 

#52615, &CBCSR 

/SET UP SECTION 3 EOR 

961 








JNPR, DATO, 

962 








/interrupt on level 5 

963 

003264 


052449 





/DELAY BETWEEN TRANSFERS 

964 

012777 

176236 


MOV 

#52645, P08CSR 

/SET UP SECTION A EOR 

965 








JNPR, DATO 

966 








/INTERRUPT ON LEVEL’ 4, 

967 

003272 


027304 





J NO DELAY BETWEEN TRANSFERS 

968 

005067 



CLP 

WATCCB 

/CLEAR BUS TESTER SECTION 3 

969 

003276 







J INTERRUPT OCCURED FLAG 

VJ 

005067 

027314 



CLR 

WATCDB 

/CLEAR BUS TESTER SECTION 4 

971 

003302 







J INTERRUPT OCCURED FLAG 

*?2 

032701 

020000 


STC0I 

BIT 

#20000, Rl 

/IF SRI BIT 13*1, DO NOT 

973 

974 

975 

003306 

001011 




BNE 

STU 

/ INITIALIZE T.Cll DECTAPE 






JTC11 

oectape controller initialization 

976 

003310 








977 

012767 

012164 

174676 


MOV 

#TC11, TC! V 

/set up Interrupt vector 

*!« 








IFOR FORWARD ENDZONE DETECTED 

979 








/SERVICE ROUTINE 

980 

003316 

016777 

179736 

175722 


MOV 

TCDRV,®TCcM 

/SELECT DRIVE TO BE tESTED 

981 

003324 

052777 

004103 

175714 


BIS 

#R*IE+RB+DO,pTCCM 

/SET DECTAPE INTERRUPT ENABLE 

982 








JSET read block number and 

983 








/REVERSE FUNCTIONS 

964 


032701 



STjll 



/START TRANSPORT 

985 

003332 

010000 


BIT 

#10000, Rl 

J IF SRI BIT 12*1, DO NOT 

986 

003336 

001011 




BNE 

ST17 

/INITIALIZE RC11 DISK 

987 








988 

989 
9»0 






IRC11 

oi$K controller Initialization 

0033«0 

012767 

043503 

004046 


MQV 

#43503, rcpunctIqm 

jsEt up disk function 

9ti 








/WRITE IN L'OW BYTE 



GENERAL TEST PROGRAM 
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9*2 

9*3 

80334* 

005077 

994 

903*52 

010377 

995 

99* 

997 

903*9* 

0050*7 

903**2 

005067 

998 

999 

803**6 

0090*7 

1000 

1001 

803*72 

0050*7 

1002 

|003 

803*7* 

0090*7 

1004 



1005 

803402 

030227 

100* 

80340* 

001012 

1007 

1008 
1009 
{0l0 

803410 

005077 

1011 

1012 

uu 

803414 

05*777 

1-014 

is: 

1017 

803422 

05*777 

1018 

1019 

1020 
1021 
1022 

803430 

0050*7 

803434 

030227 

1023 

803440 

001012 

1024 

1025 
102* 
1027 

803442 

05*777 

1028 

1029 

1030 

1031 

803450 

005077 

1092 

1833 

803454 

09*777 

1034 



1035 

103* 

8034*2 

0050*7 

1027 

1038 

8034** 

030227 

1039 

803472 

001404 

1040 

803474 

0327*7 

1041 

803502 

001005 

{042 

}<H3 

1044 

1045 

803504 

0127*7 


MACYU',624 24f QCT»73 
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175*14 

CLR 

RRCDAR 

175*1* 

MQV 

R3.9RCCSR 

02733* 

CLR 

watcrc 

00924* STI7I 

CLR 

OCDATl 

005390 

CLR 

DCDAT2 

0093*4 

CLR 

DCDAT3 

00544* 

CLR 

0CDAT4 

000001 

BIT 

R2,n 


BNE 

STlB 


IWRITE CHECK IN HIGH BYTE 

unitialize disk address register 

J SET DISK I NTERRUPT ENABLE 
I CLEAR RC1I INTERRUPT 
JOCCURED FLAG 
I CLEAR TRANSMIT DATA FOR 
JDCll #1 

j clear expected receive 

I DAT A FOR DC11 #f 
I CLEAR TRANSMIT HAtA FOR 
IDC11 n 

t clear expected receive 

IDATA FOR DC11 #2 
I IF SR2 BIT 0 = 1, DO MOT 
I INITIALIZE DC11 #1 


STiBl 


STIC I 


IDC11 #1 ASYNCHRONOUS LINE UNIT INITIALIZATION 


CLR 9DCTDBR 

SIS DCOUTF j >DCTCSR 


BJS 


CLR 


BIT 

BNE 


DCINF,?DCRCSR 


WATDC1 


R2,#2 
STIC • 


JCLEAR DC11 #1 TRANSMITTER 
IDATA BUFFER TO TRANSMIT 
J0S AS FIRST CHARACTFR 
I SET DCll #1 TRANSMITTER 
I INTERRUPT ENABLE 
I SET MAINTENANCE MODE 
I SET FOR HIGHEST SPEFD 
I SETT DCll #1 RECEIVER 
» INTERRUPT ENABLE 
I SET FOR HIGHEST SPEED 
JCLEAR DCll #1 INTERRUPT 
JOCCURED FLAG 
JIF SR2 Bit 1=1, DO NOT 
UNITIALIZE DCll #2 


I DCll #2 ASYNCHRONOUS LINE UNIT INITIALIZATION 


BIS 

CLR 

BIS 

CLR 

BIT 

9EO 

BIT 

BNE 


DDOUTF,»DCTCSA 

pdctdba 

DCINF,RDCRSR 

WATDC.2 

R2,#4 
ST1C1 
#20 , SR3 

stid 


I SET DCll #2 TRANSMITTER 

j interrupt enable 
J SET MAINTENANCE MODE 
J SET FOR HIGHEST SPEED 
JCLEAR DCll #2 

jtransmitter DATA BUFFER 

I SET DCll #2 RECEIVER 

J interrupt enable 

JSET FOR HIGHEST SPEED 
JCLEAR DCll #2 
J interrupt OCCURED flag 
J IF SR2 BIT 2 = 0, INITIALIZE 
JAA1X D/A CONVERTER 
J IF SR3 BIT 4 = 1, DO mOT 
UNITIALIZE VR20 2 COLOR SCOPE 


J A All WITH SCOPE OPTION INITIALIZATION 


0127*7 0065*6 174426 STjCll MQV 


#AA11, AAlltV 


JSET UP INTERRUPT VECTOR 


GENERAL TEST PROGRAM 
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1046 

803512 

018377 

17560* 



MQV 

R3,PSqSR 

JSET SCOPE CONTROL 

{047 








) INTERRUPT ENABLE 

1048 

803916 

038227 

000010 


ST1DI 

BIT 

R2,#t0 

JIF SR? BIT 3=1, DO NOT 

1049 

803922 

001043 




BNE 

ST3B 

UNITIALIZE AFC11 

1050 








JANALOG MULTIPLEXER 

1051 









{092 

1093 






IAFC11 

ANALOG MULTIPLEXER INITIALIZATION 

{054 

803524 

1127*7 

1777*0 

002504 


MOVB 

#«20, AFCTRl 

JSET UP TO CLEAR 

1095 

803932 

0127*7 

00*244 

002472 


MQV 

#AFTAB1, AFPTR 

JAFCU DATA TABLES 

1096 

803940 

005077 

0024*6 


STIDII 

CLR 

RAFPTR 

JCLEAR TABLES 

1097 

803544 

0*27*7 

000002 

0024*0 


ADD 

#2 , AFPTR 


1098 

803552 

1092*7 

0024*0 



I NCB 

AFCTRl 


1059 

80395* 

001370 




BNE 

ST101 


18*0 

8039*0 

0127*7 

00*244 

002444 


MOV 

#AFTAB1, AFPTR 

JSET UP POINTERS 

10*1 

8035** 

1127*7 

177770 

002442 


MOVB 

#*10, AFCTRl 

JAND SAMPLE COUNTS 

|0*2 

803974 

11*7*7 

00243* 

002435 


MQVB 

AFCTRl, AFCTR2 

J FOR STORAGE OF 

1093 








J INDIVIDUAL SAMPLES 

|0*4 








JAND AVERAGES FOR EACH 

10*9 








JCHANNEL TO BE TESTED 

10*6 

803*02 

0090*7 

002434 



CLR 

AFPFLG 

JCLEAR PASS FLAG 

{0*7 








J to enable generating 

£0*8 








jtable of averages 

£0*9 

803*86 

0127*7 

000000 

002424 


MOV 

#0,AFSEL 

JSELECT CHANNEL 0 

1070 








J AT GAIN OF 1000 

1071 

803*14 

010377 

175*04 



MOV 

R3 , 9AFCSR 

JSET INTERRUPT ENABLE 

£072 

803*20 

01*777 

002414 

179602 


MOV 

AFSEL,RAFCAR 

jstart conversion 

1073 

803*26 

0090*7 

027154 



CLR 

WATCAF 

JCLEAR INTERRUPT OCCURED FLAG 

1074 

803*32 

030227 

000200 


ST3BI 

BIT 

R2, #200 

J IF SR2 BIT 7 = 1, DO NOT 

1075 

803*3* 

00101* 




BNE 

STMT 

j initialize: addi-d analog 

|0t6 








jto digital CONVERTER 

{077 









{078 

1079 






1 AO01® 

D ANALOG TO DIGITAL CqnVErTER INITIALIZATION 

{080 









|08i 

803*40 

0127*7 

00*946 

002666 


MQV 

#ADTBL A * T B p TR 

j load pointer 

1082 

803*4* 

0092*7 

0026*4 



INC 

ADTEMP 

JSET FLAG To INDICATE FIRST Pa 

1083 

803652 

112777 

000134 

175420 


MOVB 

#134,SiADCSR 

jenable interrupts, set gain 

1084 








J(130=X8,120=X4,110=X2,100»X1) 

£085 

803**0 

105077 

17541* 



CLR8 

PADCSRO 

JSTART CONVERSION VIA DAT08 TO 

1 08* 

8036*4 

0050*7 

002*90 



CLR 

CHOUT 


1087 

803*70 

0050*7 

027196 



CLR 

HATCAD 

JCLEAR INTERRUPT OCCURED FLAG 

1088 

803*74 

032702 

'004000 


STMT 1 

BIT 

#4000 , R2 

JIF SR2 BIT 11=1, DO NOT 

£089 

1090 

803700 

001005 




BNE 

DPUA 

UNITIALIZE TMll MAGNETIC TAPE 

1091 






ITMll 

MAGNETIC TApE TRANSPORT 

Controller -initialization 

1092 









1093 

803702 

0127*7 

007946 

174314 


MQV 

#TMlt , MT I V 

jset up interrupt vector 

f 094 








jto REWIND TAPE 

1095 

803710 

010377 

175920 



MQV 

R3.PMTC 

JSET INTERRUPT ENABLE 

1096 

803714 

032702 

040000 


DPllAI 

SIT 

#40000,R2 

JIF SR2 BIT 14=1, DO NOT 

1097 

803720 

001040 




BNE 

dmprime 

unitialize DPI 1»A 

{098 








j synchronous interface 

1099 
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OitQAC ,F£l DEVICE INITIALIZATION 


1100 

1101 

1102 

803722 

009067 

80*670 


JDP11*A 

CLP 

SYNCHRONOUS interface 
dprdata 

Initialization 

J CLEAR EXPECTED RECEIVER data 

1103 

803726 

009067 

004666 


CLP 

DPTDA.TA 

> CLEAR TRANSMITTER DATA 

1104 

803732 

012777 

000300 

179436 

MQV 

*300, iDPRp 

I SET UP TO SERVICE 

1105 

1106 
1107 

8037*0 

312777 

0002*0 

175434 

MQV 

#240, iDPTp 

ireceiver Interrupts 

1 AT LEVEL 6 
1 SET UP TO SERVICE 

1108 

JtfS 

£U0 

8037*6 

012777 

010374 

175424 

MOV 

*0P11T i iDpT I V 

JTRANSMITTER INTERRUPTS 
1 AT LEVEL 5 
1 SET UP TRANSMITTER 

ini 

Ui2 

10379* 

012777 

010462 

179412 

MQV 

*PP11R » 60PH I V 

1 INTERRUPT service VECTOR 
1 SET UP RECEIVER INTERRUPT 

1 113 

hU 

803762 

012767 

000004 

004624 

MOV 

*4 , DCCCNT 

ISERVICE VECTOR 
1 SET UP TO TRANSMIT 4 

!U9 

1116 

803770 

U67T7 

00*616 

179372 

M0V8 

dptsync,pdpsync 

1 SYNC CHARACTERS 
1 LOAD TRANSMITTER 

iu7 

iiis 

103776 

109077 

175370 


clrb 

PDPESYN 

i sync buffer 

ICLEAR EXTENDED SYNC- BUFFER 

Ills 

80*002 

052777 

000109 

179350 

BIS 

#109, iDPRS 

1 SET RECEIVER INTERRUPT 

£120 

1121 

1122 

80*010 

392777 

000302 

179346 

BIS 

#302,fDPTS 

JENABLE, MAINTENANCE MODE 
JSTRIP SYNC MODE 
1 SET TRANSMITTER STATUS 

£123 
f 124 
Il25 
126 

00*016 

009067 

027092 


CLP 

WATCDP 

IINTERRUPT ENABLE, TRANSMIT 
1 DONE INTERRUPT ENABLE 
HOLE SYNC MODE 
ICLEAR INTERRUPT OCCURED FLAG 

1127 

00*022 

D32702 

100000 


DMPRJMI BIT 

#100000, R2 

1 IF SR2 BIT 1541, DO NOT 

£128 

80*026 

001121 



BNE 

ST13 

UNITIALIZE DMIl 


IDmU 16 LINE ASYNCHRONOUS MULTIPLEXER INITIALIZATION 


5(04030 

§0*036 

804042 

804046 

804084 

804042 

804070 

804076 


8043,04 

80*110 

80*112 

80*116 

80*100 


012777 

003077 

009067 

012767 

012767 

012767 

212777 

032777 


809777 

100379 

105777 

100379 

146767 


80*126 009077 


00*132 

00*136 

00*1*2 


012700 

012701 

012720 


011400 

179276 

00593? 

177777 

177777 

0119*0 

000009 

000001 


179230 

179222 

009494 

179206 

0U400 

000020 

01*606 


179310 


009364 

009496 

009310 

179242 

179236 


009412 


DMPRIAI 


MOV #DmCATi#DmBAS 
CLP 9DMC5R 

CLR TUMTAB 

MOV #*1»DMWCT 

MOV #«1 « DMMSK 

MQV *PMM$K»DMCAf 

MOV 6 1 MAI NT* , GO* PDMC8R 

BIS ill 6DMBAP 


TST POMCSR 

BPL i «4 

TST8 fOMCSR 

BPL ,*4 

BICB TUMTABiDMMSK 

CLP iOMCSR 

MOV #OmCATiR0 

MQV i!6 , | R1 

MQV #PROCTS|(R0)* 


unitialize dm base register 

I CLEAR DM CONTROL STATUS REGISTER 
I CLEAR FIR9T TUMBLE TABLE ENTRY' 

I SET UP TO TRANSMIT £ CHARACTER 
I PRESET THE CHARACTER MASK 

i load current address (Line 0> 

I SET MAINT AGO BITS 
JENABLE LINE 0 To 
I TRANSMIT 1 CHARACTER 
I WHICH IS ALL IS 
J W A I T FOR TRANSMITTER 
I TO FINISH 
I WAIT FOR RECEIVER 
I TO FINISH 

IUSE RECEIVED CHARACTER 
ITO GENERATE CHARACTER AMSK 
I CLEAR CONTROL REGISTER 

I set up to load CURRENT ' 

I ADDRESS TABLE FOR TRANSMITTER 
JEACH LINE WILL USE 
JPROCESSOR TEST CODE AS 


GENERAL Test program 
O tiGAC*, Pil ncu ' 
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1154 




£155 

80 * 1*6 

009301 


1196 

80*150 

001374 


£197 

00*192 

012700 

0114*0 

£158 

80*196 

012701 

000020 

£159 

£160 

£161 

80*162 

012720 

177400 

00*166 

005301 


f 162 

00*170 

001374 


£163 

80*172 

012700 

011600 

£164 

00*176 

012701 

000100 

I 165 

00*202 

809020 


£166 

00*204 

009301 


£167 

00*206 

00i37§ 


£168 

00*210 

005067 

009326 

£169 

00*214 

012767 

011600 

£l7 0 

£iH 

£172 

00*222 

012777 

011226 

00*230 

812777 

0002*0 

£173 




£174 

§0*236 

012777 

011072 

£175 




£l§6 

00*2*4 

012777 

0002*0 

|177 




£178 

£iT9 

£180 

1181 

1182 

004252 

812777 

010105 

00*260 

016777 

005262 

£183 




£184 

00*266 

009067 

026622 

£185 

00*272 



£186 

00*272 

032767 

000002 

£187 

§0*300 

001027 


|l88 




1189 




£190 




£191 

00*302 

012767 

005160 

£192 




£193 

10*310 

012767 

000200 

£194 

80*316 

012777 

000400 

£195 

80*324 

012777 

000100 

£196 

00*332 

032777 

010000 

£197 

00*3*0 

012777 

177660 

£198 

80*3*6 

012777 

009426 

£199 

00*354 

005277 

171710 

£200 

00*360 



£201 

00*360 

036727 

17*460 

£202 

00*366 

001016 


£203 




£204 




£205 




£206 

00*370 

012767 

004714 

£207 





009322 

179120 

179U4 

179U0 

179104 

179060 

179094 

17*590 

173720 

173714 

17*744 

17*736 

17*730 

174724 

174720 

0000*0 

173632 


DEC 

BNE 

MOV 

MOV 

DM6RIBI MOV 

DEC 

BNE 

MOV 

MOV 

DMPRICI CLR 
DEC 
BNE 
CLP 
MOV 
MQV 


MOV 

MOV 

MOV 

MOV 

MOV 

CLP 

BIT 

BNE 


STI3I 

ST62i 


PI 

DMPRIA 

4 DMWCT | R 0 

*16, i R 1 

i»400i I R0 ) * 

PI 

DMPRIB 
#TUMTAB»P0 
#64 , | R| 

IR0J* 

PI 

OMPRIC 

DMTOAT 

#TUMTA8,0MPTR 
iOMUR | iOMPVEC 

#,omprty,<iomrpptv 

#DMllT|fOMTVEC 

#,DMPRTY,*DmTPBTV> 

i, GO*', MAINT*. RfE* 


dmbapim.pdmbar 

WATCOM 

*2, SP3 
ST* 


1 1 TS transmit buffer 


I SET UP TO LOAD 

icurrent address table 

ITRANSMIT 400 ( octal ) 

I BYTES ON EACH LINE 


J CLEAR TUMBLE TABLE 


I CLEAR RECEIVED DATA POINTER 
I SET UP POINTER TO TUMBLE TABLE 
I SET UP RECEIVER 
I INTERRUPT SERVICE VECTOR 
# SET UP TO SERVICE 
INTERRUPT AT LEVEL‘5 
I SET TRANSMITTER 
I INTERRUPT SERVICE VECTOR 
1 SET UP TO SERVICE TRANSMITTER 
I INTERRUPT AT LEVEL $ 

,f IE iPDMCSR 

I SET RECEIVER INTERRUPT ENABLE 
JTRANSMITTER INTERRUPT ENABLE 
MAINTENANCE MOD AND GO 
JENABLE ALL lines FOR 
I TRANSMISSION 

J CLE AR INTERRUPT OCCURED FLAG 

IIF SR3 BIT l*i, DO NOT 
UNITIALIZE CDii CARD READER 


icon card reader Initialization 


ST03I 
ST 4 1 


MQV 

MQV 

MQV 

MOV 

BIT 

MOV 

MOV 

INC 

BIT 

8NE 


*CO I SR i CRDR I V 

*200 i CBDRpS 

*400, iCOST 

*100 , iCDST 

#010000|PCDST 

#«120|PCDCC 

*CDBUFF,PCDBA 

»COST 

SR1,*40 

ST100 


>set up vector FqR Cfill 

ISERVICE ROUTINE 
ISERVICE AT LEVEL 4 
I POWER CLEAR CDli 

i set con interrupt enable 

IIS READER OFF LINE 
I SET UP FOR 80 COLUMN CARDS 
I SET UP BUS ADDRESS REGISTER 
ISTART CARO READER 

I IF SRI BIT 5 = 1, DO NOT 
UNITIALIZE CRil/CMli CARD READER 


iCRiii cmu card reader Initialization 


MQV 


*CRCMU,CRORfV 


i set up vector for crii/cmu 
iinterrupt service routine 



general: TEST program 
DMGacVPU device 

MACYll',624 24«0CT»73 

initialization 
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1208 

00*376 

012767 

000300 

173626 


MOV 

#300 ( CRDRPS 

J SERV ICE AT LEVEL 6 

1209 

804404 

005087 

00054? 



CLR 

CRCK1 

1 CLEAR CHECKSUM 1 

1210 

004410 

009067 

000540 



CLR 

CRCK2 

I CLEAR CHECKSUM 2 

_ iaii 

004414 

009067 

000536 



CUR 

CRCLCT 

) CLEAR CARD READER COLUMN COUNT 

1212 

004420 

010477 

174636 



MOV 

R4 1 6CRS 

> START READING AND ENABLE INTERRUPTS 

I 1213 

004424 

004777 

174372 


8T108I 

JSR 

PC,9P«IME 

ICALL TO USER DEVICE PRIMING CODE 

L # 1214 

004430 

042767 

000340 

173340 


8 X 0 

#340, PS 

J ALLOW INTERRUPTS 

1215 

004436 

000401 




BR 

, *4 

I WAIT HERE FOR INTERRUPTS 

1216 

004440 

000001 



MAfNUI 

WAIT 


1217 







IJF PROCESSOR TEST IS INHIBITED 

1218 

004442 

036727 

173122 

002000 

mains 1 

BIT 

SR, #2000 

1 IF SR BIT 10*1, 

1219 

004450 

001373 




BNE 

MAfNLI 

1 inhibit processor test 

£220 

004452 

000167 

010130 



JMP 

PROCTS 



general 

TEST PROGRAM • 

MACYH 1 624 24»OCTf 73 i 

20120 

PAGE 27 


D2QGAC»P11 

TELETYPE RECEIVER INTERRUPT service 



1221 





,5fcTTL 

TELETYPE RECEIVER INTERRUPT 

SERVICE 

1222 

1223 

804456 

105777 

17**16 


TTYlNRl 

TSTB 

PTRCSR 

IIS DONE SET 

1224 

804462 

100401 




BMI 

,+4 


1225 

804464 

104000 




HUT 


1 FALSE RETURN FROM MAINLINE 

1226 

804466 

105777 

17*410 



TSTB 

PTROR 

ITEST DATA FOR LEADER 

1227 

004472 

00141? 




BEQ 

TTY JN2 

JlF LEADER GO BACK 

1228 

004474 

127767 

1.74402 

000006 


CMPB 

PTRDR,BDATAi 

J NOT LEADER TEST FOR DATA 

1229 

004502 

001401 




BEO 

TTYIN3 


1230 

004504 

104000 




HUT 


1 DAT A COMPARISON ERROR 

1231 

004506 

105227 



TTVIN3I 

I NOB 

(PC)* 

1 INCREMENT DATA 

1232 

004510 

000000 



bqatai i 

0 



1233 

00*512 

001002 




BNE 

TTYIN2 


1234 

00*514 

005267 

177770 


TTVINU 

INC 

BDATA1 

JBASE DATA 

1235 

004520 

005277 

174354 


TTV IN2 1 

INC 

PTRCSR 

jstart reader 

£236 

004524 

000002 




RTI 


J RETURN TO MAINLINE 

1237 









1238 









1239 





,SBTTl 

TELETYPE TRANSMITTER interrupt service 

1240 

1241 

004526 

105777 

174352 


TYoUTRl 

TSTB 

PTTCSR 

itest for Done 

1242 

004532 

100401 




BMI 

,64 

IBRANCH IF FLAG POUND 

1243 

004934 

104000 




WLT 


IFALSE INTERRUPT RETURN 

1244 

00*536 

105227 




INCB 

(PC)* 

1 INCREMENT DATA 

1245 

00*5*0 

000000 



BDXTA2) 

0 



1246 

00*9*2 

016777 

17777? 

174336 

TYOUT1I 

MQV 

B0ATA2*9TTDBR 


1247 

00*550 

000002 



TYQUT2 j 

RTI 


IRETURN TO MAINLINE 

1248 





IHSR SECTION 

VALUES 0 TO 377 


1249 

1250 





,S§TTL 

HIGH 

SPEED READER INTERRUPT 

SERVICE 

|25l 

£252 

00*592 

105777 

17*33? 


HSR INR 1 

TSTB 

PHRCSR 


1253 

§0*556 

100401 




BMI 

,64 


r £254 

00*560 

104000 




HLT 


IFALSE RETURN FROM MAINLINE 

1 1255 

§0*562 

105777 

17432* 



TSTB 

•HRDBR 

ITEST DATA FOR LEADER 

I 1256 

00*566 

001412 




BEQ 

HSRIN2 

IJF leader GO BACK 

L 1257 

00*570 

127767 

17*316 

000006 


CMPB 

iHRDBR, DAT*3 

1 NOT LEADER TEST FOR DATA 

1258 

10*576 

001*01 




BEQ 

,*4 


1259 

§0*620 

104000 




«LT 


IDATA COMPARISON ERROR 

1260 

00*692 

105227 




INCB 

(PC)* 

I INCREMENT DATA 

1261 

00*604 

001000 



DAf A3 1 

0 



1262 

004606 

00100? 




BNE 

HSRIN2 


1263 

00*610 

005267 

177770 


HSRIN1I 

INC 

DATA3 

JBASE DAtA 

1264 

00*614 

005277 

17*270 


HSRIN2I 

INC 

PHRCSR 

jstart READER 

1265 

00*6*0 

00000? 




RT! 


J RETURN TO MAINLINE 

1266 









1267 









1268 

Horn 





• SiTTL 

X 

tat 

X 

SPEED PUNCH INTERRUPT ! 

service 

1*69 

1270 

00*622 

105777 

17*266 


HPoUTR* 

TSTB 

•HpCSR 

itest for Done 

12 H 

00*626 

100401 




BMI 

i*4 

IBRANCH IF FLAG POUND 

1272 

00*630 

104000 




HLT 


IFALSE INTERRUPT RETURN 

1273 

00*632 

032767 

000010 

17*204 


BIT 

#10, SRI 

1 IF HIGH SPEED READER WAS 

1274 

00*6*0 

001016 




BNE 

HP0UT2 

INOT SELECTED, DO NOT ENABLI 


c 



GENERAL test program MACYll’,624 ?4 wQCT;73 20|20 RAGE 28 
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£275 

704642 

042777 

000100 

174240 


SIC 

#100,0HRCSH 

) CLEAR HSR INTERRUPT ENABLE 

£276 

80*690 

005267 

000036 



INC 

INTCNT 

1 COUNT INTERRUPTS 

£277 

704694 

026727 

000032 

000006 


CMP 

I NTCNT « #6 

[SAVE TO TURN READER ON? 

£278 

704662 

001009 




BNE 

HP0UT2 

1 NO-NEED MORE TIME 

£279 

704664 

005067 

000022 



CUR 

jntcnt 

1 YES RESET COUNTER 

£280 

704670 

092777 

000100 

174212 


PIS 

#100i PHRCSR 

J SET READER I NT ENABLE 

£281 

704676 

105227 



HP0UT2I 

INCB 

(PC)* 

J INCREMENT DATA 

£282 

704700 

700000 



DAtA4| 

0 



£283 

704702 

016777 

177772 

174206 

HPOUTlI 

MOV 

PATA4,6HP0BR 

IOUTPUT TO DEVICE 

£284 

704710 

707072 




RTI 


[RETURN TO MAINLINE 

£285 

$286 

704712 

707000 



INtCNTl 

0 



1287 

£288 

1289 

£290 





.ssttl 

CRH, 

CMU CARD READER 

Interrupt service 

704714 

105777 

174342 


CRCmIII 

TSTB 

6CRS 

i check column ready 

£291 

704720 

100015 




PPL 

CRCHK1 

JBRANCM IF NOT SET 

£292 

704722 

005267 

700230 



INC 

CRCICT 

[COUNT number of columns 

£293 

704726 

067767 

174332 

000216 


ADO 

6CRB1,CRCK1 

[ADO DATA To CHECKSUM £ 

£294 

704734 

767767 

174326 

000212 


ADO 

PCRB2.CRCK2 

1 ADD ENCODED DATA TO CHECKSUM 2 

$295 

704742 

105777 

174314 



TSTB 

»CRS 

[CHECK COLUMN READY 

£296 

904746 

107001 



BPL 

i*6 

[BRANCH IF CLEARED 

£297 

90*790 

104000 




HLT 


[READING DATA DlON>T CLEAR COLUMN READY 

1298 

704792 

707002 




RTI 


[RETURN 

$299 

704794 

032777 

747000 

174300 

CRCHKli 

BIT 

#40000| PCRS 

[CHECK FOR CARD HONE 

$300 

704762 

701447 




8£0 

CRCHK2 

J BRANCH IF NOT SET 

£301 

704764 

022767 

000120 

000164 


CMP 

#80,,CRCLCT 

[CHECK FOR EIGHTY COLUMNS 

£302 

704772 

001406 




BEQ 

CR1 

[BRANCH IF OK 

$303 

704774 

022767 

000090 

700154 


CMP 

#40, ,CRCICT 

[40 COLUMNS 

£304 

709002 

001433 




BEQ 

CRCHK6 


$305 

709004 

104000 




HUT 


[TOTAL NUMBER OF COLUMNS READ NOT 80 OR 40 

£306 

709006 

000423 




BR 

CRCHK4 


£307 

709010 

726767 

000132 

007134 

CR£l 

CMP 

CRSUHli CRC^l 

[CHECK FOR CORRECT ALPHA CARD IMAGE SUM 

$308 

709016 

001471 




BEQ 

CRCONT 

[BRANCH IF CORRECT 

$309 

709020 

104000 




HLT 


[CARD IMAGE CHECKSUM INCORRECT 

£3£0 

709022 

026767 

000122 

700124 

CRfiONT I 

CMP 

CRSUM2,CRC«2 

[CHECK FOR CORRECT ALPHA ENCODED' SUM 

£3ii 

709030 

001401 




BEQ 

CRCNT 

[BRANCH IF CORRECT 

$3£2 

709030 

104000 



CRfiNT 1 

HLT 


[ENCODED CHECKSUM INCORRECT 

£313 

709034 

005777 

174222 


TST 

• CRS 

[CHECK FOR ERROR 

$3$4 

709040 

100001 




BPL 

, *4 

[BRANCH IF NOT SE.T 

$315 

709042 

104000 




HLT 


[ERROR BIT WAS SET 

$316 

709044 

732777 

000400 

174210 


BIT 

#400 , 6CRS 

[CHECK OFFtLINE (BIT 81 

£317 

809092 

001401 




BEQ 

, *4 

[BRANCH IF NOT SET 

£318 

709094 

700002 




RTI 


[IF READER OFFLINE, DON'T STaRT IIP AGAIN 

1319 

709096 

005067 

000074 


CRCHK4I 

CL« 

CRCLCT 

[CLEAR COLUMN COUNT 

$320 

709062 

005067 

000064 



CLR 

CRCK1 

[CLEAR CHECKSUMS 

$321 

709066 

009067 

000062 



CLR 

CRCK2 


$322 

709072 

012777 

000101 

174162 

CRCHK6I 

MOV 

#101 , PCRS 

J CLEAR INTERRUPTING CONDITION, RESTART READER 

1323 

709100 

000002 




RTI 


[RETURN 

$324 

809102 

005777 

174154 


CR6HK2I 

TST 

• CRS 

[CHECK BIT 15 

£325 

709106 

100006 



BPL 

CRCHK3 

[BRANCH IF NOT SET 

$326 

709110 

032777 

000400 

174144 


BIT 

#400 , #CRS 

[CHECK OFF-LINE (BIT 81 

$327 

709116 

001007 



8NE 

CRCHKS 

[BRANCH IF SET TO WAIT FOR ON-LINE 

£328 

709120 

104000 




HLT 


JERROR BIT WAS SET, OTHERS WEREN'T 
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£329 

£330 

£331 

1332 

$333 

1334 

£333 

£336 

1337 

£338 

£339 

$340 

£341 

£342 

£343 

$344 

$345 

£346 

£347 

£348 

£349 

$350 

|35l 

£352 

£393 

£354 

£355 

$356 

£357 

£358 

£359 

£360 

$361 

£362 

1363 

$364 

£365 

$366 

£367 

$368 

£369 

£370 

£37i 

£372 

£373 

$374 

1375 

$376 

13^8 

$379 

$380 

$381 

1382 


805122 

007405 




BR 

CRCHK9 


808124 

732777 

702070 

174130 

CRCHK3I 

BIT 

#2000 , #CRS 

[CHECK BIT 10 

809132 

001391 




BNE 

CRCHK4 

[BRANCH IF SET 

809134 

101080 




HLT 


i no interrupting bits were SEf 

809136 

042777 

170777 

174116 

CR8HK5I 

BIC 

#100007, *CRS 

[CLEAR ERROR BIT 

809144 

700002 




RTI 


[RETURN 

809146 

067443 



CRSUMli 

67443 


[DESIRED TOTAL FOR ALPHANUMERIC CARD* IMAGE DATA 

805190 

714173 



CRSUM2J 

14173 


[DESIRED TOTAL FOR ALPHANUMERIC ENCODED OaTa 

805192 

707070 



CRCK1I 

0 


[RUNNING CHECKSUM FOP CARD IMAGE 

805194 

707070 



CRCK2I 

0 


[RUNNING CHECKSUM FOR ENCODED DATA 

809196 

707070 



CRCLCT i 

7 


[CARD READER COLUMN COUNT 





,s§m 

CDU 1 

CARO READER INTERRUPT 

SERVICE 


705426 



CDfOP?CD@UFF 


[CDU DATA BUFFER 


705546 



COENDP»l 

COBUFF+127 

[END OF BUFFER IN PACKEO MODE 


705666 



CDEN0IfCDBUFF*247 

[END OF BUFFER IN IMMASE MODE 

809160 

732777 

707010 

174102 

CD f SR 1 

BIT 

#10, PCQST 

[CHECK TRANSITION TO ON-LINE 

805166 

70i07i 




BNE 

CDRET1 

[BRANCH IF SET 

805170 

105777 

174074 



TSTB 

RC0ST 

[CHECK FOR CONTROLLER READY 

805174 

107471 




BMI 

CPtSRl 

[BRANCH IF CONTROLLER READY 

805176 

104000 




HUT 


[CONTROLLER READY NOT SET 

805200 

705777 

174064 


COf SRI I 

TST 

»CDST 

[CHECK ERROR FLAG 

805204 

107473 




BMI 

C.DCHK1 

[BRANCH IF SET 

805206 

710146 




MOV 

R1 « • ( SP ) 

[SAVE R1 

805210 

017246 




MQV 

R2,*(SP) 

[SAVE R2 

805212 

705002 




CLR 

R2 

[CLEAR R2 

805214 

712771 

705426 



MQV 

#COTOP,R! 

[SET R1 AS POINTER 

805220 

7127*7 

177660 

177730 


MQV 

#•127, CRCLCT 

[SET UP COUNTER 

809226 

705777 

174040 



TST 

fCDCC 

[CHECK COLUMN COUNT REGISTER 

809232 

70C401 




BEQ 

,♦4 

[BRANCH IF OK 

805234 

174070 




HLT 


[COLUNM COUNT REGISTER ERROR 

809236 

727727 

174032 

705546 


CMP 

»CDBA,#COENDp 

[CHECK BUS ADDRESS F oR pACK MoDE 

805244 

00£422 




BEQ 

CPL0P2 

[BRANCH IF PACK MODE 

805246 

027787 

174022 

005666 


CMP 

tCDBA,#COENDI 

[CHECK BUS ADDRESS FOR IMAGE MODE 

805294 

701402 




BEQ 

cdlopi 

[BRANCH IF IMAGE MODE 

805256 

104000 




HLT 


[BUS ADDRESS REGISTER ERROR 

809260 

007432 




BR 

CPRET 

[SKIP DATA CHECKING 

8092*2 

762172 



CDL’QPli 

ADO 

(R1)*,R2 

[ADD UP THE BUFFER 

0052*4 

705267 

177666 



INC 

CRCLCT 

[COUNT 

805270 

701374 




BNE 

cdlopi 

[BRANCH IF NOT DONE 

809272 

7272*7 

17W§90 



CMP 

R2, CRSUMi 

[CHECK THE' SUM 

805276 

00£471 




BEQ 

,★4 

[BRANCH IF OK 

805300 

104077 




HLT 


[CHECKSUM ERROR, IMAGE MODE 

805302 

712777 

007172 

173760 


MQV 

#102,#CDST 

jset packing mode 

809310 

707416 




BR 

CPRET 

[CONTINUE 

805312 

1121*7 

177634 


C0L0P2I 

MQVB 

(K1)*iCrCK1 

[move byte into word 

805316 

766772 

177630 



ADD 

CRCK1.R2 

[ADD UP THE BUFFER 



general 

TEST program 
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OZfiCAC i P ll 

COil CARO READER INTERRUPT SERVICE 



1383 

009322 

005267 

177630 



INC 

CHCUCT 

1 COUNT 

1384 

909326 

001371 




BNE 

CDL0P2 

1 B R A N C H IF NOT DONE 

1385 

905330 

220267 

177614 



CMP 

R2.CRSUM2 

1 CHECK THE SUM 

1386 

925334 

001401 




BEO 

.*4 

1BRANCH IF OK 

1387 

905336 

104000 




HLT 


checksum error, packing mode 

$388 

905340 

012777 

000100 

173722 


MOV 

A100,8CDST 

1 CLEAR PACKING MODE BIT 

$389 

005346 

012602 



CDRETf 

MOV 

{ SP ) ♦ 4 R2 

JRESTOPE R2 

$390 

905350 

012601 




MOV 

(SPJ+4R1 

1 RESTORE R1 

$39i 

905352 

012777 

177660 

173712 

CDRETil 

MOV 

4*120, PCDCC 

J SET UP COLUMN COUMT 

$392 

005360 

012777 

005426 

173706 


MQV 

*CDBUFF,«CDBA 

1 SET UP BUS ADDRESS 

$393 

905366 

005277 

173676 



INC 

• COST 

1 RE AO 

$394 

905372 

000002 



CDCHKlf 

RTI 



$395 

905374 

032777 

010000 

173666 

BIT 

410000I&CQST 

1 CHECK FOR OFFoLtNE 

$396 

905402 

001402 




BEQ 

, +6 

J branch if not 

$397 

905404 

000002 




RTI 


J RETURN -AND WAIT FOR ON-LINE 

$398 

$399 

005406 

032777 

027000 

173654 


BIT 

4027000, PCDST 

jcheck For other error bits 

$400 

005414 

001402 




BE® 

,*6 

) B r A N CH IF NONE SET 

$401 

005416 

104000 




HLT 


JEND OF FILE ERROR (M120P ONLY), 

$402 








1 D AT A ERROR, DATA LAtE ERROR, OR 

$403 








INON-EXISTANT memory error; 

$404 

005420 

000754 




BR 

CURETl 

IGO ON TO NEXT CARD 

$405 

$406 

$407 

005422 

104000 




HLT 


J CARD READER STATUS ERROR 

005424 

000752 




8R 

CDRETl 

IGO ON TO NEXT CARD 

$408 

005426 

000000 



CDgum 

0 



$409 


005670 



,i' *240 




$4$0 









$4|1 

$4$2 

$4$3 





,S8TTL 

AFC11 

analog multiplexer 

INTERRUPT SERVICE 

905670 

105777 

173530 


A F 2 1 1 1 

TSTB 

PAFCSR 

iafcu done bit set? 

$4$4 

005674 

100401 




BMI 

, +4 

$4i5 

005676 

104000 




HUT 


1 NO , ERROR 

$416 

005700 

.067777 

173922 

000324 

AFADOl 

ADD 

•AFDBR , 0AFPTR 

i generate total 

$4$7 

905706 

105267 

000324 



I NC3 

AFCTR1 

JALL SAMPLES IN 

$4$8 

005712 

001092 




BNE 

afexit 

INO 

$419 

005714 

006277 

000312 



ASR 

PAFPTR 

JDIV1DE TOTAL BY 10 (OCTAL) 

$420 

905720 

006277 

000306 



ASR 

9AFPTR 


$421 

005724 

006277 

000302 



ASR 

PAFPTR 


$422 

905730 

062767 

000002 

000274 


ADD 

#2 , AFPTR 

J UPDATE POINTER 

$423 

005736 

005267 

000276 



INC 

AFSEL 

) advance channel 

$424 

905742 

109267 

000271 



INCB 

AFCTR2 

JALL CHANNELS DONE? 

$425 

005746 

001026 




BNE 

afexa 

INO 

$426 

105750 

005767 

000266 



TST 

afpflg 

JYES, PASS!? 

$427 

005754 

001040 




BNE 

afcom 

J NO , COMPARE RESULTS 

$428 

005756 

005167 

000260 



COM 

AFPFLG 

JPASS1, CHANGE FOR PASS2 

$429 

909762 

012767 

006264 

000242 

AFSP2I 

MQV 

4AFTAB2, AFPTR 


$430 

009770 

012767 

174370 

000240 


MQV 

4174370, AFCTR1 


$431 

9.05776 

005077 

000200 


AF6LRI. 

CLR 

PAFPTR 

1 CLEAR TABLE FOR PASS2 

$432 

006002 

062767 

000002 

000222 


ADD 

42, AFPTR 


$433 

906010 

105267 

000222 



INC8 

AFCTRl 


$434 

006014 

001370 




BNE 

afclr 


$435 

906016 

012767 

006264 

000206 


MQV 

4AFTAB2, AF p TR 

) SET UP POINTER FOR DA? A STORAGE 

$436 

006024 

112767 

177770 

000204 

AFfeXAl 

MQVB 

4*10, AFCTRl 

J SET UP TO TAKE £0 ( OCTAL ) SAMPLES PER LIN 

GENERAL 

TEST PROGRAM 
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DZOGAC i 

P!l 

Aren ANALOG MULTIPLEXER INTERRUPT SERVICE 



$437 

106032 

0127*7 

000000 

000200 


MOV 

#0, AFSEL 

JFIRST CHANNEL IS0 

$438 

906040 

016777 

000174 

173362 

afexit i 

MOV 

AFSEL, PAFCAR 

JSTART MULTIPLEXER 

$439 

106046 

012767 

000001 

029732 


MQV 

#1 , watcaf 

J SET INTERRUPT OCClIRFO FLAG 

$440 

906094 

000002 



AFeoMi 

RTI 


JRETURN TO MAINLINE 

$441 

006056 

012767 

006244 

000146 

MOV 

PAFTAB1, AFPTR 

J SET UP TO COMPARE DATA TABLES 

$442 

006064 

112767 

177770 

000144 


MQVB 

#*10, AFCTRl 

J10 (OCTAL) CHANNEL'S 

$443 

006072 

0127*7 

006264 

000134 


MQV 

#AFTAB2 , AFPTR A 

I MILL BE COMPARED 

$444 

906100 

017767 

000126 

000132 

AFeOMlI 

MQV 

PAFPTR.AFTEMP 

J GET DATA 

$445 

006106 

167767 

000122 

000124 


SUB 

® AFPTRA , AFTEMP 

ICOMPARE 

$446 

006114 

100402 




BMI 

, *6 

J GET ABSOLUTE VALUE OF DIFFERENCE 

$447 

906116 

005467 

000116 



NE6 

AFTEMP 


$448 

006122 

062767 

000020 

000110 


ADD 

#20, AFTEMP 

J COMPARE TO ERROR LIMIT 

$449 

006130 

002001 




BGE 

,*4 


$450 

006132 

104000 




MLT 


JDIFFERENCE NOT WITHIN LIMIT, ERROR 

$451 

006134 

0627*7 

000002 

000070 


ADD 

#2, AFPTR 

JUPDATE POINTERS 

$452 

006142 

062767 

000002 

0000*4 


ADD 

#2, AFPTRA 


$453 

006150 

1052*7 

000062 



INCB 

AFCTRl 

JUPDATE COUNTER 

$454 

006154 

001391 




BNE 

AFCQMi 

JCONTINUE IF NOT DONE 

$455 

006156 

012767 

006244 

000046 

AFMOV I 

MOV 

5AFTAB1, AFPTR 

) REPLACE OLD TABLE 

$456 

006164 

0127*7 

006264 

000042 


MOV 

#AFTAB2., AFPTRA 

1 OF DATA WITH NEW DATA 

$457 

006172 

112767 

177770 

000036 


MQVB 

#*10iAFCTR1 


$458 

006200 

017777 

000030 

000024 

AFMQVlj 

MOV 

®afptra,®afptr 


$459 

006206 

062767 

000002 

000016 


ADD 

#2, AFPTR 


$460 

906214 

062767 

000002 

000012 


ADD 

#2, AFPTRA 


$461 

006222 

105267 

000010 



INCB 

AFCTRl 


$462 

006226 

00$ 364 




BNE 

afmqvi 


$463 

006230 

000654 




SR 

AFSP2 

J GET NEW DATA 

$464 

006232 

000000 



AFPTR t 

0 



$465 

006234 

000000 



AFPTR A * 

0 



$466 

006236 

000 



AFCTRl ) 

.BYTE 

0 


$467 

006237 

000 



AFCTR2I 

.BYTE 

0 


$468 





.EVEN 

AFfEMPj 




$469 

106240 







$470 

906240 

000000 



AFSEL 1 

0 



$47l 

006242 

000000 



AFPFLGj 

0 



$472 

006244 

000000 



AFYABli 

0 



$473 


006264 



+16 

AF?AB2) 




$474 

006264 

000000 



0 



$475 


006304 



,«;*i6 




! 4 !* 





.SBTTL 




$477 

$478 

$479 





AD01 ■ 

a/d Converter interrupt 

service 

006304 

005777 

172770 


AD01DI 

TST 

padcsr 

JCHECK FqR ERROR 

$480 

906310 

100001 




BPL 

,44 

JBRANCM IF NOT SET 

$481 

006312 

104000 




HLT 


JERROR BIT WAS SET 

$482 

006314 

01777? 

172756 

000212 


MQV 

®ADDBR,#TBPTR 

) LOAD DATA IN TARLE 

$483 

006322 

026717 

000206 

006554 


CMP 

TBPTR,#AOTBLA*6 

JCHECK FOR TABLE FILLED 

$484 

006330 

00$004 




BNE 

API 

jbrancw if not at end of table a 

$485 

006332 

012767 

006556 

000174 


MOV 

#ADTBUB,TBPTR 


$486 

00*340 

000424 




BR 

APCK 


$487 

00*342 

026727 

000166 

006564 

AD$ t 

CMP 

TEJPTR, #ADTRLB*A 


$488 

906350 

001004 




BNE 

AD2 

JBRANCH if not at end of- table B 

$489 

006392 

012767 

006946 

000154 


MOV 

#ADTBLA,TBPTR 


$490 

00*3*0 

000414 




BR 

AOCK 
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1491 

006362 

062767 

000002 

000144 

AD2I 

ADD 

#2 , TBPTR 

j move pointer 

1492 

006370 

005267 

000144 



INC 

CHOUT 

1 ERROR MAY BE SET, So 

1493 

006374 

116777 

000140 

172700 


MQVB 

ghout.radcsro 

1 USE A MOVE TO CLEAR IT AND START CONVERSION 

1494 

006402 

012767 

000001 

024442 


MOV 

(Hl.WATCAO 


*495 

006410 

000002 




RTJ 



1496 

006412 

005767 

000120 


ADCKI 

TST 

APTEMP 

ITEST TOR FIRST PASS 

*497 

*498 

*499 

006416 

00*037 




BNE 

ADCQNT 

IIP SO, PILL OTHER TABLE 

006420 

012767 

00696ft 

000114 


MQV 

PADTBLA.PoImTA 

1 LOAD POINTER To TABLE A In PqInTA 

1900 

006426 

012767 

006996 

000110 


MOV 

IADTBLB, POINTS 

1 LOAD POINTER TO TABLE B IN POINTS 

*901 

006434 

017767 

000102 

000074 

ADLOOPI 

MOV 

»POlNTA, AQTEMP 

J PUT DATA TN ADTEMP 

*502 

006442 

167767 

000076 

000066 


SUB 

RPOINTB. ApTEMp 

1 SUBTRACT SECOND READING ON SaME CHANNEL 

*503 

006450 

005267 

000062 



INC 

ADTEMp 

ICHECK POR A-B<-i 

*904- 

006454 

100001 




BPL 

,♦4 

IBRANCH IP OK 

*905 

006456 

106000 




MET 


1 DAT A NOT EQUAL TO + OR * 1 LSB 

*906 

006460 

162767 

000003 

000050 


SUB 

#3, ADTEMP 

ICHECK POR A-B>+* 

*907 

0064*6 

100401 




BM! 

,*4 

IBRANCH IP OK 

*508 

006470 

104000 




HUT 


1 DATA NOT WITHIN * OR « 1 LSB 

*509 

006472 

062767 

000002 

000042 


ADD 

#2 , PO J NTA 

IMOVE POtNtA 

*5*0 

006500 

062767 

000002 

000036 


ADD 

P2.P0INTR 

IMOVE POINTS 

*5*1 

006006 

026727 

000030 

006996 


CMP 

pointai#adtbla;i§ 

ICHECK POR END OP TABLE 

*9*2 

006914 

00*347 




BNE 

ADUOOP 

1 LOOP IP NOT DONE 

*5*3 

006916 

005067 

000014 


ADfiONTI 

CLR 

APTEMP 

JFIRST PASS COMPLETE 

*9*4 

006922 

003067 

000012 



CLR 

CHOUT 

UNITIALIZE CHANNEL fO CONVERT ON 

£5*5 

006926 

105077 

172990 



clrb 

•ADCSRO 

I START CONVERSION 

15*6 

*5*7 

*5*8 

006932 

000002 




RTJ 



006934 

000000 



TBPTRI 

0 



*5*9 

006936 

000000 



AQtEMPf 

0 



*520 

006940 

000000 



CHOUTJ 

0 


1 CURRENT CONVERSION CHANNEL 

1521 

006942 

000000 



PQfNTAl 

0 


1 WHERE IN A 

1522 

006944 

000000 



PQfNTB! 

0 


1 WHERE IN B 

*523 

006966 

000000 



AOfBLAl 

0 


I TABLE a 

1924 


006536 




.S', + 6 



*925 

§06956 

000000 



ADfBIBi 

0 


1 TABLE 5 

*526 

*527 

*928 


006566 




,«>6 







,S0TTL 

A A 11 WITH SCOPE INTERRUPT 

SERVICE 

1529 









*530 

1531 

*532 





1 DISPLAY "PDP»U W ON SCOPE 


006566 

105777 

172932 


AAUl 

TSTB 

PSCSR 

1 IS DONE SET 

*533 

006972 

100402 




SM! 

,*6 

*534 

006974 

104000 




MLT 


1 DONE NOT SET 

*535 

006976 

000002 




RTI 



*536 

006600 

012767 

000000 

027766 


MOV 

#0,XPOS 

{SHOULD WORK POR ALL SCOPES 

*537 

006606 

005067 

027760 



CUR 

YPOS 


*538 

006612 

012767 

000006 

027762 


MOV 

P6.CNTR 

16 CHARACTER COUNT 

1539 

006620 

012767 

036522 

027752 


MQV 

ptext.pntr 

ITEXT "PDPali" 

1540 

006626 

012767 

006730 

171304 


MOV 

#CHAR3|140 

1 INTERRUPT VECTORS 

*541 

006634 

017767 

027760 

027724 

TXfll 

MOV 

0PNTR.AAR2 


*542 





1 PLOT CHARACTER 



*943 

006662 

016767 

027724 

027726 

CHARI 

MOV 

YPOS.YPT 

unit enter with scope interrupt 

*544 

006650 

092777 

000024 

172446 


BIS 

#24,PSCSR 

1 enable INTENSIFY OP LOADING Y 
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*545 

§06696 

012767 

177773 

027676 


MOV 

#*5,AAR0 

IMATRIX COUNT (ROW) 

£546 

§06664 

012767 

177771 

027672 

CHARI 1 

MOV 

#«7, AAR1 

IMATRIX COUNT (COLUMN) 

£547 

§06672 

117767 

027670 

027670 


MQV8 

4AAR2, AAR3 

1 GET CHARACTER 

*548 

§06700 

005267 

027662 



INC 

AAR2 


*549 

§06704 

106167 

027660 


CHAR2I 

RQIB 

AAR3 

INTENSIFY POINT? 

*530 

§06710 

100007 




BPL 

CHAR3 

1 NO 

*951 

§06712 

016777 

027636 

172406 


MOV 

XPOS,POAC0 

1 LOAD X 

*552 

§06720 

016777 

027646 

172402 


MOV 

VPOS,JiDACl 

(LOAD V ANO INTENSIFY 

| 55 g 

§06726 

§00002 




RTI 


(RETURN TO MAINLINE 

*554 

§06730 

105777 

172370 


CHAR3I 

TSTB 

dSCSR 

IIS DONE SET 

*555 

§06734 

100401 




BM I 

,44 


*956 

§06736 

104000 




HLT 



1557 

§06740 

062767 

000070 

027624 


ADD 

#70, YPOS 

(NEXT POINT 

*558 

§06746 

005267 

027612 



INC 

AARl 

1 DONE ALL POINTS IN A COLUMN? 

*559 

§06792 

001394 




BNE 

CMAR2 

(NO 

*560 

§06794 

016767 

027616 

0276*0 


MOV 

YPT.YPOS 

(NEXT COLUMN 

*561 

§06762 

062767 

000070 

027604 


ADD 

#70, XROS 

•JADD SCALE 

*562 

§06770 

005267 

027366 



INC 

AAR0 

(DONE ALL COLUMNS? 

*963 

§06774 

00*333 




BNE 

CHARI 

INO 

*364 

§06776 

062767 

000070 

027970 


ADD 

#70 , XPOS 

1 YES , POSITION FOR NEXT CHARACTER 

*565 

§07004 

062767 

000002 

027966 


ADD 

#2,PNTR 

1 NEXT CHARACTER 

*566 

§07012 

032767 

000020 

172030 


BIT 

#20 , SR3 


*567 

§07020 

00*016 




BNE 

CHAR4 


*568 

§07022 

032777 

001000 

172274 


BIT 

#1000 i PSCSR 

IIS GREEN BIT SEt 

*569 

§07030 

00*004 




BNE 

.**2 

J YES , CLEAR FOR RED 

*570 

§07032 

052777 

001000 

172264 


BIS 

#1000 i frSCSR 

INO, SET FOR GREEN 

*971 

§07040 

000403 




BR 

,410 


*572 

§07042 

042777 

001000 

172254 


BIC 

#1000 i PSCSR 

(DISPLAY IN RED 

*573 

§07090 

105777 

172290 



TSTB 

tSCSR 

(WAIT FOR COLOR CHANGE 

*574 

§07054 

00*375 




BNE 

CNTR 


*575 

§07096 

005367 

027320 


CHAR4I 

DEC 

I DONE ALL? 

*576 

§07062 

00*264 




BNE 

TXTl 

INO 

*577 

§07064 

042777 

000002 

172232 


BIC 

#?,9SC$R 

UNIT AND ERASE 

*578 

|579 

*580 

|38l 

*582 

§0,7072 

000635 




BR 

A All 

(LOOP 





, SiTTL 

RKU 

disk Interrupt service 


§07074 

109777 

172114 


RK*1I 

TSTB 

«RKCSR 

(INTERRUPT VECTOR POINTS HERE 

*583 

§07*00 

100402 




BM! 

,4-6 

*584 

§07102 

104000 




HLT 


IRK11 READY NOT UP 

*585 

§07104 

000417 




BR 

RKSTART 


*586 

§07106 

009777 

172102 



TST 

&RKCSR 


*987 

§07112 

100002 




BPL 

, +6 


*588 

§07114 

104000 




HLT 


IRK11 ERROR FLAG UP 

*589 

§07116 

000412 




BR 

RKSTART 


*590 

§07120 

032777 

000037 

172096 


BIT 

#37 , PRKDAR 

JDISK AT UPPER LIMIT? 

*991 

§07126 

001011 




BNE 

RK1 

INO 

*592 

§07130 

122777 

000031 

172050 


CMPB 

#3i,$RKDAH 


*593 

§07136 

00*005 




BNE 

RKi 

J NO 

*594 

§07140 

000367 

000040 



SWAB 

RKFUNCTION 

(CHANGE command 

*595 

§07144 

016777 

172092 

172032 

RKSTARTl MQV 

RKDRV , 4RKQAR 

unitialize disk-.dar.dae 

*996 

§07192 

016777 

000364 

172032 

RK£l 

MOV 

LUMIT,4RKBAR 

(CORE BASE 

*597 

§07160 

016777 

000022 

172022 


MOV 

RKWQRDCT | &RKWC 

jlenoth of transfer 

*998 

§07166 

116777 

000012 

172020 


MQVB 

rkfunction.prkcsr 

(WRITE OR WRITE CHECK TO DISK 



GEIUERAi; Test program MACUi;62« 24tOCT;73 2*120 p AGE 34 

D2QGAC i Pll *Kll DISK INTERRUPT SERVICE 





1599 

1600 
1601 
1602 

1603 

1604 

1605 

1606 

$07174 

$07202 

$07204 

$07206 

012767 

000002 

000000 

176000 

000001 

023626 

1607 

1608 

1609 

1610 

$07210 

$07214 

$07216 

$07220 

109777 

100402 

104000 

000413 

3.72104 


1611 

1612 

1613 

1614 

$07222 

$07226 

$07230 

$07232 

005777 

100002 

104000 

000406 

172072 


1615 

1616 

$07234 

$07242 

122777 

001010 

000312 

172042 

1617 

$07244 

000367 

0000*2 


1618 

$07250 

012777 

000001 

172042 

1619 

1620 

$07256 

$07262 

105777 

100375 

172036 


1621 

$07264 

016777 

000252 

172024 

1622 

$07272 

016777 

000012 

172014 

1623 

1624 

1625 

1626 

1627 

1628 
1629 

$07300 

$07306 

$07310 

$07312 

116777 

000002 

176000 

000000 

000006 

172012 

1630 

1631 

1632 

1633 

$07314 

$07320 

$07322 

$07324 

105777 

100402 

104000 

000413 

171654 


1634 

1635 

1636 

1637 

$07326 

$07332 

$07334 

$07336 

$05777 

100002 

104000 

000406 

1716^2 


1638 

1639 

$07340 

$07346 

022777 

$01005 

003740 

171620 

1640 

$07350 

000367 

000040 


1641 

$07354 

012777 

000000 

171604 

1642 

$07362 

016777 

000154 

171602 

1643 

$07370 

016777 

000022 

17157? 

1644 

$07376 

116777 

000012 

171570 

1645 

1646 

1647 
1646 

1649 

1650 

1651 

1652 

$07404 

$07412 

$07414 

$07416 

012767 

000002 

000000 

176000 

000001 

023306 


MOV 

UiWATCRK 

RTJ 


RKFUNCTIQNI 

0 

RKWQRDCT l 

*2000 

.SBTTl RPll 

DISK INTERRUPT service 

RPll 1 TSTB 

9KPCSR 

BMI 

HLT 

,66 

BR 

RPSTART 

TST 

PRPCSR 

BPL 

HUT 

i*6 

BR 

RPSTART 

CMPB 

#312,$RPCA 

BNE 

RP1 

SWAB 

RPFUNCTION 

RPSTARTtMQV 

#00001, pRRCSR 

TSTB 

PRPCSR 

BPL 

i *6 

RPll MOV 

LUM1T,PRPBAR 

MOV 

RPWORDCT,»«PWC 

MQVB 

RTI 

RPWORDI *2000 
RPPUNCi 0 

RPFUNCTION, PRPfcSR 

1 

, SBTTL RCll 

DISK INTERRUPT SERVICE 

RCUl TSTB 

9RCCSR 

BMI 

HLT 

,66 

BR 

RCST ART 

TST 

6RCCSR 

BPL 

HUT 

,66 

BR 

RESTART 

CMP 

#3740,PRCDAR 

BNE 

RC2 

SWAB 

RCFUNCTION 

RCSTARTl 

MOV #0000 , PROD AR 

RC2l MOV 

UUIMIT,PRCBAR 

MOV 

RCWORDCT, pRCWC 

MOVB 

RCFUNCTION, PPCCSR 

MOV 

RTI 

#1 , WATCRC 

RCFUNCTIONI 

0 

rcwqrdcti 

*2000 


i SBTTL RFil DISK INTERRUPT SERVICE 


IRETURN TO MAINLINE CODE 

I DISK COMMAND 
J LENGTH OF' TRANSFER 

I INTERRUPT VECTOR POINTS here - 
IRPU REAOV NOT UP 


J RPll ERROR FLAG UP 

ICVLJNDER NO, 312 
J NO 

ICHANGE COMMAND 
UNITIALIZE DISK * DARiDAE 
JWAIT FOR CONTROL REaDV 

> INITIAL CORE ADDRESS 
JLENGTH OF TRANSFER 
IWRITE OR WRITE CHECK To DISK 
IRETURN TO MAINLINE CODE 


IINTERRUPT VECTOR POINTS here 
I RC ll READV NOT UP 


IRCH ERROR FLAG UP 

JDISK AT UPPER LIMIT, 7740*2, 13740*3, 17740=4 
I NO 

ICHANGE COMMAND 

UNITIALIZE DISK » DaRwDAE 

ICORE BASE 

ILENGTH OF TRANSFER 

IWRITE OR WRITE CHECK To DISK 

IRETURN TO MAINLINE CODE 

JDISK COMMAND 
ILENGTH OF TRANSFER 


GENERAL' 

Test program 

MACYU',624 24* 

QCT«73 2*120 PAGE 35 


PZ0GAC', 

pH 

RFil DISK INTERRUPT SERVICE 



1693 

$07420 

109777 

171932 


RFil ! TSTB 

9RFCSR 

IINTERRUPT VECTOR POINTS HERE 

1654 

$07424 

1004*2 



BMI 

, *6 


1655 

$07426 

104000 



HUT 


JRFU READV NOT UP 

1656 

$07430 

000424 



BR 

restart 


1657 

$07432 

005777 

171520 


TST 

PRFCSR 


1658 

$07436 

100002 



BPU 

,*6 


1659 

$074*0 

104000 



HUT 


JRFU ERROR FLAG Up 

1660 

$07442 

000417 



BR 

RPSTART 


1661 

$07444 

005777 

171502 


TST 

9RFWC 


1662 

$07450 

100002 



BPU 

, +6 


1663 

$07492 

104000 



HUT 


1 RFll WORD COUNT NOT ZERO 

1664 

$07454 

000412 



BR 

RFSTART 


1665 

$07456 

122777 

000003 

171460 

CMPB 

#3,9RFDAE 

JDISK AT UPPER L 1M IT? < #7*2, #17*4 , #37*8 DISKS 

1666 

$07464 

001010 



BNE 

RP1 

1 NO 

1667 

$07466 

027727 

171496 

174000 

CMP 

PRFDAR , #174000 

IAS FAR ON DISK AS WE CAN GO 

1668 

$07474 

101404 



BUGS 

RF 1 

J NO 

1669 

$07476 

000367 

000036 


SWAB 

FUNCTION 

ICHANGE COMMAND 

1670 

$07502 

105277 

171492 


RFSTARTl 

I NCB 9RFCSRH 

UNITIALIZE DISK * DARsDAE 

1671 

$07506 

$16777 

000030 

171440 

RFjl MQV 

LUMlTiPRFCAR 

ICORE BASE 

1672 

$07514 

016777 

000024 

171430 

MOV 

WQRDCT , PRFWC 

ILENGTH OF TRANSFER 

1673 

$07522 

116777 

000012 

171426 

MQVB 

FUNCTION, 9RFCSR 

IWRITE OR WRITE CHECK To DISK 

1674 

$07530 

012767 

000001 

023102 

MQV 

#1, WATCRF 


1675 

$07536 

000002 



RTI 


J RETURN TO MAINLINE CODE 

1676 

$07540 

000000 



FUNCTION I 

0 

JDISK COMMAND 

1677 

$07542 

014606 



UUIMIT) PROCTS 


1 FIRST CORE ADDRESS OF TRANSFER 

1678 

1679 

1680 

$07544 

179777 



WQRDCTi *2001 


ILENGTH OF TRANSFER 





, SBTTL MAG TAPE INTERRUPT SERVICE 


1681 








1682 

1683 

1684 





1 REWIND TAPE UNIT 


$075*6 

*12767 

007564 

170450 

TmJII MOV 

#MTRWXiMTIV 

JVECTOR SETUP 

1685 

$07554 

012777 

060117 

171652 

MOV 

#60117, PMJC 

IREWIND 

1686 

$07562 

000002 



RTI 


JBACK TO MAINLINE 

1687 

1688 
1689 

$07564 

000400 



MTBWXI BR 

mtwrite 






IWRITE A RECORD 

800 PBI, 9TRACK, ODD 

PARITY 

1690 

$07566 

012767 

007620 

170430 

MTWRITEI 

MOV #mtwrtx,mtiv 

JVECTOR 

1691 

$07574 

016777 

000412 

171634 

MOV 

mtuength,#mtbc 

JBYTE COUNT 

1692 

$076*2 

016777 

000336 

171630 

MOV 

mtwbuf,#mtca 

ICORE ADDRESS 

1693 

$07610 

112777 

060109 

171616 

MOVB 

#60105, #mtC 

IWRITE A RECORD 

1694 

$07616 

000002 



RTI 


JBACK TO MAIN LINE 

1695 

$07620 

109777 

171610 


MTWRTXI TSTB 

9MTC 

ITEST FOR CU READY 

1696 

$07624 

100401 



BMI 

.*4 


1697 

$07626 

104000 



HUT 


IREADY NOT UP ON INTfRRUPT 

1698 

$07630 

009777 

171600 


TST 

9MTC 

) ANY ERROR? 

1699 

$07634 

100005 



BPU 

MTBKSP 

1 NO ERRORS • BACK SPACE 

1700 

$07636 

032777 

002000 

171566 

BIT 

#2000, PMTS 

IIS ERROR EOT? 

1701 

$076*4 

001001 



BNE 

MTBKSP 

1 HAVE EOT, CONTINUE TEST 

1702 

IJM 

1704 

$076*6 

104000 



HUT 


1 ERROR WAS NOT EOT 





JBACK SPACE ONE 

record 


1705 

$07650 

$12767 

007672 

170346 

MTBKSPI MOV 

#MTBKX,MTIV 


1706 

$07656 

005177 

171594 


COM 

PMTBC 

JBACK SPACE ONE RECORD 



neral 

TEST PROGRAM 

MACYU',62* 24* 

qct;73 

20120 PAGE 36 

9GAC, 

PU 

MAG TAPE INTERRUPT SERVICE 



1707 

407662 

012777 

060113 

171544 


MOV 

#60113|0MTC 

1708 

407670 

400002 




RTI 


£739 

407672 

105777 

171336 


MT8KXJ 

TSTB 

PMTC 

1710 

407676 

1004«1 




BM! 

,*4 

£711 

407700 

104000 




hlt 


1712 

407702 

005777 

171326 



TST 

•MTC 

1713 

407706 

100001 




BPL 

,*4 

1714 

f 74'R 

407710 

104000 




HLT 


P I 





1 READ PREVIOUSLY WRITTEN RECORD 

1717 

407712 

0127*7 

007744 

170304 

MTREADI 

MOV 

#MTRDX,MTJV 

1718 

407720 

01*777 

0002*6 

171310 


MOV 

MTLEN'GTH,*MTRC 

1719 

407726 

016777 

0001*2 

171304 


MOV 

MTRBUF|»MTCa 

1720 

407734 

012777 

060103 

171472 


MQV 

*60103«*MTC 

1721 

407742 

000002 




RTI 


1722 

407744 

105777 

1714*4 


MTRDXI 

TSTB 

*MTC 

1723 

407750 

100401 




BM! 

,44 

1724 

407752 

104000 




HLT 


1725 

407754 

005777 

17143* 



TST 

PMTC 

1726 

407760 

100005 




BPL 

MTR1 

1727 

407762 

032777 

002000 

171442 


BIT 

42000 * *MTS 

1728 

407770 

0012*6 




BNE 

TMU 

1729 

407772 

104000 




HLT 


1730 

007774 

000401 



MTfUl 

BR 

MTCK 

1731 

FT'S? 

407776 

000673 



MTR2I 

BR 

MTWRITE 

X r OC 

1733 





iCflECK MAG TARE 

data buffers 

1734 

010000 

0167*7 

000070 

000062 

MTSKI 

MQV 

MTRBUFiMTRO 

1735 

010006 

026777 

0000*0 

000054 

MTfiKU 

CMP 

MTOATA#0MTR0 

1736 

010014 

001401 




BEG 

,*4 

1737 

010016 

104000 




HLT 


1738 

010020 

0627*7 

000002 

000042 


ADD 

42 , MT.R0 

1739 

010026 

02*7*7 

000036 

000106 


CMP 

MTR0,ENOBUF 

1740 

010034 

0013*4 




BNE . 

MTCK1 

|74i 








1742 





1 clear 

THE BUFFER 

1743 

010036 

0167*7 

000032 

000024 


MOV 

MTR8UF i MTR0 

1744 

0100*4 

005077 

000020 


MTCK2I 

CLR 

PMTR0 

§74$ 

010050 

0627*7 

000002 

000012 


ADD 

42 , MTR0 

1746 

010056 

0267*7 

000006 

000056 


CMP 

MTR0,ENDBUF 

1747 

010064 

0013*7 




BNE 

MTCK2 

1748 

010066 

0007*3 




BR 

MTR2 

1749 

010070 

000000 



MTB0I 

0 


1750 

010072 

052525 



MTDATAI 

52525 


1731 

010074 

010076 



MTRBUFI 

i *2 


1752 


0101*2 




,«',** 4 


1753 

0101*2 

0101*2 



ENBBUFi 

| 


1754 

0101*4 

0101*6 



MTWBUFi 

i *2 


1735 

0101*6 

032525 




52525 


1756 

010150 

032525 




52525 


1757 

010152 

052525 




52525 


1758 

010154 

032525 




52525 


1759 

010156 

032525 




52525 


1760 

010160 

052525 




52525 



I SACK SPACE 
i TEST FOR READY 


JCU READY NOT UP 

ITEST FOR ERRORS * SACK SPACE 


JBACK SPACE ERROR 


I VECTOR 
I BYTE COUNT 
I BUSS ADDRESS 
I READ COMMAND 
I RETURN ■ TO MAINLINE 
I RE AD UP 


I READY NOT UP ON READ INTERRUPT 


MS ERROR EOT 
I YES REWIND TAPE 
I ERROR ON READ RECORD 
J CHECK DATA 
JWRITE NEXT RECORD 


I SET UP COUNTER 
I TEST THE DATA 

I MAG TAPE DATA ERROR 
MNCREMENT COUNTER 
JXXXXXX CHECK 
HOOP TILL DONE 


I SETUP COUNTER 
I CLE AR THE BUFFER 
MNCREMENT BEFORE WORD 
i at upper Limit 
I NO * BRANCH-TILL done 
I EX I T READ to DO NEXT WRITE 
J MAGTAPE COUNTER 
J DATA TO BE TESTED FOR 


J MAG TAPE WRITE BUFF ER 
J MAG TAPE WRITE PUFFER 
J MAG TAPE WRITE BUFFER 
J MAG TAPE WRITE PUFFER 
J MAG TAPE WRITE BUFFER 
IMAG TAPE WRITE BUFFER 


OCNERaL TEST PROGRAM MACYU' $24 24.0CTi73 28J20 

02iGAc;pii mas tape interrupt service 


PAGE 37 


1761 

0101*2 

f 762 

0101*4 

{763 

0101*6 

{764 

010170 

1765 

010172 

{766 

010174 

{767 

010176 

1768 

810200 

{769 

010202 

{770 

010204 

|77i 

010206 

1772 

010210 

{773 

010212 

1774 


1775 


{776 


§777 

010214 

177a 

010222 

{779 

010226 

{780 

010230 

{781 

010232 

1782 

010236 

{783 

0102*0 

i7»4 

0102*2 

1785 

0102*6 

{786 

010250 

1787 

010252 

1788 

010256 

{789 

0102*0 

{790 

0102*2 

£ 79l 

010270 

1792 

010274 

{793 


{794 

010302 

{793 

010304 

{796 

010312 

{797 

010316 

{798 


{799 

010324 

£800 

010326 

{801 

010334 

{802 

0103*0 

{803 


1804 

1103*6 

|805 

010350 

1806 


1807 


{808 


|809 

0183»2 

i8i0 

010356 

fail 

0103*0 

1812 

0103*2 

X8{3 

0103*4 

f8£4 

010372 


852525 

52525 

JMAG 

TAPE 

WRITE 

buffer 

052525 

52525 

IMAG 

TAPE 

WRITE 

BUFFER 

852525 

52525 

IMAG 

TAPE 

WRITE 

8UFFER 

852525 

52525 

IMAG 

TAPE 

WRITE 

buffer 

052525 

52525 

IMAG 

TAPE 

WRITE 

PUFFER 

052525 

52525 

IMAG 

TAPE 

WRITE 

buffer 

052525 

52525 

IMAG 

TAPE 

WRITE 

buffer 

052525 

52525 

IMAG 

TAPE 

WRITE 

buffer 

052525 

52525 

IMAG 

TAPE 

WRITE 

buffer 

352525 

52525 

IMAG 

TAPE 

WRITE 

buffer 

052525 

52525 

IMAG 

TAPE 

WRITE 

buffer 

052525 

52525 

IMAG 

TAPE 

WRITE 

BUFFER 

177734 

MTLENGI *44 






kW.u-p programmable clock Interrupt service 





.SBTTl 

0127*7 

000001 

022300 

KWllPI 

105777 

00{001 

104000 

171214 




005777 

001401 

104000 

171206 



005777 

001481 

171200 



104000 

0057*7 

100423 

001011 

000072 



012777 

801750 

171154 

KWflPAi 

1051*7 

000054 



012777 

000101 

1711*0 


000002 

012777 

0001** 

171132 

KWflPBl 

1051*7 

000033 



012777 

000403 

171116 


000002 

012777 

000012 

171110 

KWilPCI 

005067 

000010 



012777 

000105 

171074 


000002 

000000 



KWBATEi 




, SBTTL 

105777 

100402 

104000 

000403 

1705*2 


KWilLl 



0127*7 

000002 

000001 

022104 



MQV 

#1,WATCKP 

TSTB 

rkwcsr 

BNE 

,*4 

hlt 


TST 

pkwcsb 

BEG 

, *4 

HLT 


TST 

pkwctr 

BED 

«** 

HLT 


TST 

KWRATE 

BM! 

KW11PC 

BNE 

KWllPB 

MQV 

#1000', ,0KWCS§ 

COMB 

KWRATE 

MOV 

#101 i 9KWCSR 

RTI 


MQV 

#100, ,®KWCSB 

CQMB 

KWRATE*! 

MOV 

#103, PKWCSR 

RTI 


MOV 

#10,,PKWCSB 

CLR 

KWRATE 

MOV 

#105, PKWCSR 

RTI 



0 


KWUtL REAL time clock interrupt 

TSTS ®lKCSR 

BM! ,*6 

HLT 

BR ,*10 

MOV #1 , WATCKL 

RTI 


I SET WATCHDOG BIT 
ICHECK FOR' DONE Rif 
I SET ON INTERRUPT 
I DONE NOT SET, ERROR 
I WAS COUNT SET BUFFER 
I CLEARED BY UNDERFLOW 
INO, ERROR 

I WAS COUNTER CLEARED 
I BY UNDERFLOW 
J NO i ERROR 

MF KWRAYE = 0,SET UP FOR 
J100KHZ, IF NEGAfIVE, LINE 
! FRED , i IF>0, 10WH2 
I SET UP FOR 1000 (DECIMAL) COUNTS 
INEXT CLOCK RATE IS 10KH? 

I THIS CLOCK RATE IS 100KHH 

I CLOCK WILL’ INTERRUPT |N 10 MS 

I SET UP FOR 100 (DECIMAL) COUNTS 
INEXT CLOCK RATE IS 60 HZ 

ITHIS CLOCK RATE IS 10KH2 

I CLOCK will interrupt IN 10 MS 

I SET UP FOR 10 (DECIMAL) COUNTS 
INEXT CLOCK RATE IS 100 KHZ 
ITHIS CLOCK RATE IS 60 HH 
I CLOCK WILL INTERRUPT IN 160 MS 


service 

jtest for Done 

I FALSE INTERRUPT 
IDO NOT SET WATCHDOG 
I SET WATCHDOG 
IRETURN 





GENERAL' t£ST PROGRAM MACYU‘,624 24*QCT;73 20(20 PAGE 38 

OilGAC,l»£l KWil«*L REAL time CLOCK INTERRUPT SERVICE 


£8£5 









1 8 i 6 





iSBTTt 

DPI! 

SYNCHRONOUS LINE UNIT INTERRUPT SERVICE 

|8i7 









1818 





(SYNCHRONIZATION 


£8£9 









1820 

§10374 

016777 

000212 

170764 

OPilTI 

MOV 

OPTSYNC , PQPTB 

IXMIT SYNC 

£821 

§10402 

005367 

000206 



DEC 

DCCCNT 

(HAVE 2 SYNC'S BEEN XMITED 

1822 

9)10406 

001003 




BNE 

T18 

1 NO 

£823 

9)10410 

012777 

010420 

170762 


MQV 

«TV19,PDPTIV 

(YES CHANGE VECTOR 

£824 

810416 

000002 



T1SI 

RT! 



1825 









1826 

£827 

£828 





(SEQUENTIAL DATA TRANSMlTTION ROUTINE 


810420 

105777 

170740 


TVl9 1 

TSTB 

PDPTS 

(TRANSMITTER READY 

£829 

810424 

00i001 




BNE 

,44 

1 YES 

£830 

810426 

104000 




WIT 


(NO, report ealse INTERRUPT 

£831 

810430 

116777 

000164 

170730 


movb 

DPTDATA.PDPTB 

(LOAD BUFFER 

£832 

810436 

105267 

000156 



INCB 

DPTOATA 

(NEXT CHARACTER 

£833 

8104*2 

001006 




BNE 

T19 

(NO 

£834 

810444 

012777 

010374 

170726 

RESYNCj 

MOV 

#DP11T i PDpTl V 

(SET UP TRANSMITTER 

£835 








1 INTERRUPT VECTOR 

£836 








(FOR SYNC ROUTINE 

£837 

810452 

012767 

000004 

000134 


MOV 

#4,dcccnt 

(SET UP TO TRANSMIT 

£838 








>4 SYNC CHARACTERS 

£639 








(TO REiSYNCHRONIZE RECEIVERS 

£640 

810460 

000002 



T19I 

RT I 



£841 









£842 

£843 

£844 





(RECEIVE SEQUENTIAL DATA 


810462 

012767 

000001 

022404 

DpllRI 

MOV 

91.WATC0P 

»set Interrupt occijred flag 

£845 

010470 

010446 




MOV 

R4 * « ( SP ) 

(SAVE R4 ON STACK 

£846 

010472 

105777 

170662 



TSTB 

PDPRS 

1 IS RECEIVER DONE BIT SET 

£847 

010476 

001001 




BNE 

,44 


£848 

010500 

104000 




WLT 


(DONE NOT SET, ERROR 

£849 

010502 

017704 

170654 



MQV 

6DPRB.R4 

(SAVE RECEIVED CHARACTER 

£850 

010506 

120467 

000104 



CMPB 

R4 , qprdaTa 

(WAS CORRECT CHARACTER RECEIVED 

£851 

010512 

00£413 




BED 

OP11RB 

(IF YES, EXIT 

£852 

010514 

032777 

040000 

170642 


BIT 

#40000 , PORTS 

i IS RECEIVER OVER RUN SET 

£853 

010522 

001002 




BNE 

DP11RA 


£854 

010524 

104000 




WLT 


(DATA ERROR 

£855 

010526 

000420 




BR 

DP11RRS 

(RESTART AND RESYNC 

£856 

010530 

104000 



DPilRAI 

WLT 


(OVER RUN ERROR, 

£857 








(CHANGE TO NOP TO SUPPRESS 

£858 








(OVERRUN ERROR ERPORTS 

1859 

010532 

042777 

040000 

170624 


tie 

#40000 , ?DpTS 

(CLEAR OVER RUN 

i860 

010540 

000413 




BR 

DP11RRS 

(RESTART TRANSMISSION 

£861 

0105*2 

105267 

000050 


DPilRBI 

INCB 

DPRDATA 

JUPDATA EXPECTED DATA 

£862 

010546 

001410 




REQ 

OP11RRS 

JIF END OF DATA, RESTART 

£863 

010550 

026767 

000042 

000034 


CMP 

DPRDATA, OPTSYNC 

(IS CHARACTER TO BE TRANSMITTED SYNC 

£864 

010556 

00£002 




BNE 

DPURC 

(IF not ,exit 

£865 

010560 

105267 

000032 



INCB 

DPRDATA 

(DO NOT RECEIVE SYNC 

£666 

010564 

012604 



DPjlRCI 

MQV 

( SP ) + , R 4 

(RESTORE R4 

£867 

§10566 

000002 




RT! 


(RETURN TO MAINLINE CODE 

£868 

810570 

042777 

004000 

170562 

DPllRRSI 

BIC #4000,<*DPRS 

(CLEAR RECEIVER ACTIVE 
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£869 

§10576 

§12604 




MQV 

(SP)*,R4 


(RESTORE R4 

£870 

§10600 

005067 

000012 



CLR 

DPRDATA 


J CLEAR EXPECTED RECEIVE DATA 

£87l 

§10604 

005067 

000010 



CLP 

OPTDATA 


(CLEAR TRANSMIT DATA 

£872 

§10610 

000715 




BR 

RESYNC 


JRESYNCHRQNIHE RECEIVER 

£873 

§10612 

000026 



DPfSYNCl 

26 


(TEST SYNC CHARACTER 

£074 

§10614 

000000 



DCCCNT! 

0 



JSYNC COUNT 

£875 

§10616 

000000 



DPRDATA) 

0 


(receiver Data 

£876 

£877 

£878 

£879 

£880 

§10620 

000000 



DPf DATA l 

0 


(TRANSMITTER DATA 





.SBTTl 

OCtl 

ASYNCHRONOUS line 

unit #i 

INTERRUPT SERVICE 

§10622 

105777 

170556 


DCilTlI 

TSTB 

0OCTCSR 


(test f 0 r qqne on Interrupt 

£881 

§10626 

100401 




DM! 

, +4 


£882 

§10630 

104000 




WLT 



(FALSE INTERRUPT 

£883 

§10632 

105227 




INCB 

(PC)* 


(INCREMENT DATA 

§884 

§10634 

000000 



DCDATl i 

P 




£885 

§10636 

001002 




BNE 

DCOUTl 


(DONE*START OVER 

£886. 

§10640 

005067 

177770 


OCOUTl 

CLR 

DCDATl 


JINITILIZE DATA 

£857 

§10644 

016777 

177764 

170534 

DCOUTH 

MQV 

DCD AT l , jDCTDRR 


(TRANSMIT DATA 

£888 

§10652 

000002 




RT! 



(RETURN TO MAINLINE 

£889 










£890 

£891 

£892 





1 DCll receiver ROUTINE VALUES 1 

i § TO 377 

§10654 

017767 

170530 

000060 

OCilRlI 

MOV 

PDCrCSR i D pSSP 


(SAVE CSR» CLEARED WHEN READ 

£893 

§10662 

100005 




BPL 

DCIN5 


(BRANCH ON NO ERROR 

£894 

§10664 

104000 




WLT 



(DATA SET NOT READY 

£895 

§10666 

005067 

177742 



CLR 

DCDATl 


(REINITILIZE data 

£896 

§10672 

005067 

000024 



CLR 

OCDAT2 


IREINITILIHE data 

£897 

§10676 

105767 

000040 


0CTN5I 

TSTB 

OPSSR 


(ON INTERRUPT TEST FoR DONE 

£898 

§10702 

100401 




BM! 

, +4 



£899 

§10704 

104000 




hlt 



(FALSE INTERRUPT, DONE NOT SET 

£900 

§10708 

127767 

170500 

000006 


CMPB 

(?DCRDBR,DCDAT2 


J IS DATA CORRECT ( 

£901 

§10714 

001401 




BEQ 

DCIN3 



£902 

§10716 

104000 




hlt 



(DC 11 RECEIVER DATA ERROR 

£903 

§10720 

105227 



0CIN3I 

INCB 

(PC)* 


JUPDATE EXPECTED DATA PATTERN 

£904 

§10722 

000000 



DCDAT2I 

O 




£905 

§10724 

001002 



DCfNil 

BNE 

DCIN2 


(NO-LOOK FOR THE REST 

£906 

010726 

005067 

177770 


CLR 

DCDAT2 


(set up basic data 

£907 

§10732 

012767 

.000001 

022002 

DC|N2 1 . 

MQV 

#1 , WATDC1 



£908 

§10740 

000002 




RT I 



jreturn to mainline 

1909 

§10742 

000000 



DPSSPl 

0 



(SAVE PS OF CSR 

£9£0 

§10744 

000134 - 



OCOUTF* 

134 



(CHANGE TO 134 FOR MAINTENANCE MODE 

§9£l 









(130 FOR TELFPHASE LINE 

£9£2 

§10746 

000130 



DCfNFl 

130 



JCHANGE 130 TO 100 FOR SLOWER SPFED(TTY) 

|9£3 





, SBTTL 





£9£4 

ms 

£916 





DCll 

asynchronous line 

UNIT #2 

Interrupt service 





i DCll TRANSMITTER #1 INTERRUPT 

SERVICE 


£9£7 

§10750 

109777 

170444 


DC£lT2| 

TSTB 

3DCTCSA 


(TEST for done on INTERRUPT 

£9£8 

§10754 

100401 




SMI 

, *4 



£?£9 

§10756 

104000 




hlt 



(FALSE INTERRUPT 

£920 

§10760 

109227 




INCB 

. (PC)* 


(INCREMENT DATA 

£921 

§10762 

000000 



DCDAT3I 

0 




£922 

§10764 

001002 




BNE 

DC0UT3 


jdone»start over 
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1923 

110766 

005067 

177770 


DCOUTAI 

CLR 

QC0AT3 

I1NITILI2E DATA 

1924 

010772 

016777 

177764 

170422 

0C0UT3 1 

MQV 

DC0AT3,P0CTDBA 

ITRANSMIT data 

1929 

011000 

000002 




RTI 


J RETURN TO MAINLINE 

HI) 





iDMt RECEIVER ROUTINE VALUES? 0 TO 

377 

1928 

011002 

017767 

170406 

000060 

0C11R2I 

MQV 

RDCRSR,QPSSR1 

J SAVE CSR , CLEARED WHEN READ 

1929 

011010 

100005 




BPL 

DCIN5A 

IBRANCH on no error 

1930 

011012 

104000 




HLT 


1 DAT A SET NOT READY 

1931 

011014 

005067 

17774? 



CLR 

0CDAT3 

JREINITUI2E DATa 

1932 

011020 

005067 

000024 



CLR 

DCDAT4 

ireinitilihe data 

1933 

011024 

105767 

000040 


DCIN5AI 

TSTB 

DPSSRl 

ion interrupt test for done 

1934 

011030 

100401 




BMI 

,*4 


£935 

011032 

104000 




ML.T 


IFALSE INTERRUPT. DONE NOT SET 

1936 

011034 

127767 

170356 

000006 


cmpb 

S*PCRBR,DCDAT4 

IIS DATA CORRECT! 

£937 

011042 

001401 




0EO 

DCIN3B 


1938 

011044 

104000 




HLT 


IOC 11 RECEIVER DATA ERROR 

1939 

011046 

105227 



DCIN3B i 

I NCB 

<PC)* 

IUPDATE EXPECTED DATA PATTERN 

1940 

011050 

000000 



0C5AT4 ) 

0 



1941 

011052 

001002 




BNE 

DCIN4A 

1 NOwLOOK FOR THE REST 

1942 

011054 

005067 

177770 


0CTN3AI 

CLR 

DCDAT4 

I SET UP BASIC DATA 

1943 

011060 

012767 

000001 

021676 

. OCf N4A 1 

MQV 

#1 i WATDC2 


1944 

011066 

000002 




RTI 


IRETURN TO MAINLINE 

1945 

jr Q A a 

011070 

000000 



PPSSR1I 

0 


1 SAVE PS OF CSR 

1947 

940 





,S8TTL 

DM11 

asynchronous multiplexer Interrupt service 

1949 





jdmii transmitter interrupt service 

ROUTINE 

1950 

011072 

010046 



DMllT | 

MOV 

R0 » « ( SP ) 

ISAVE R0 & R1 ON 

1951 

011074 

010146 




MQV 

Rl, * f SP) 

ITHE STACK 

1952 

011076 

005000 




CLR 

R0 

1 CLEAR INT ERROR INDICATOR 

1953 

011100 

032777 

060000 

170232 


BIT 

#,NEX*-,OVRUN,.P0M&SR 

1 ERROR FLAGS ? 

1954 

01U06 

001405 




BED 

DMTIN 

IBRANCH IS NO ERROR FLAGS 

1955 

011110 

104000 




HLT 


1 ERROR FLAG 

1956 

011112 

042777 

,060000 

170220 


B J C 

NEX+", OVRUN i ROMOS R 

1 CLEAR ERROR FLAG 

1957 

011120 

005100 




COM 

R0 

1 SET INT ERROR INDICATOR 

1958 

011122 

005777 

170212 


OMf INI 

TST 

rdmcsr 

IREADY FLAG? 

1959 

011126 

100404 




BM! 

DMT INI 


i960 

01U30 

005700 




TST 

R0 

» INT BEACUSE OF ERROR? 

1961 

011132 

001032 




BNE 

DMT 1 NX 

IYES, BUT' NO READY* EXIT 

1962 

011134 

104000 




HLT 


1 NO ERROR* NO READY 

1963 

§11136 

000430 




BR 

OMTINX 

1 EX I T 

1964 

011140 

042777 

100000 

170172 

DMf INI | 

BIC 

A i READY i POMCSR 

ICLEAR READY 

1965 

01U46 

005000 




CLR 

R0 


1966 

011150 

012701 

000001 



MQV 

AliRl 


1967 

011154 

030177 

170162 


dmtinai 

BIT 

Rl.PDMBAR 

1 WHICH LINE FINISHED? 

1968 

011160 

001013 




BNE 

dmtinb 


1969 

011162 

030167 

000360 



BIT 

ri.dmbarim 

ISHOULD THIS LINE BE RESTARTED 

1970 

011166 

001410 




BEQ 

dmtinb 

IBRANCH IF NOT 

|97l 

011170 

012760 

014606 

011400 


MOV 

#PROCTS,DMCAT(R0) 

1 INITIALIZE WORD COUNT 

1972 

011176 

012760 

177400 

011440 


MQV 

#*r400,DM w CT (R0) 

1 CURRENT ADDRESS 

1973 

011204 

050177 

170132 



BIS 

Ri.PPMBAR 

JAND RESTART LINE THAT FINISHED 

1974 

011210 

062700 

000002 


DMf I NB 1 

ADO 

A2.R0 


1975 

011214 

006301 




ASL 

R1 


1976 

011216 

103356 




BCC 

dmtina 
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1977 

§11220 

012601 



OMf 1 NX 1 

MQV 

{ SP ) * i R1 


1978 

.§11222 

012600 




MOV 

<SP)+,R0 


1979 

§11224 

000002 




RTI 


IEXIT 

i960 

1981 

1982 





f Drill RECEIVER 

INTERRUPT SERVICE 

ROUTINE 

§11226 

§10046 



OMllPI 

MQV 

R0* * { SP I 


1983 

§11230 

010146 




MOV 

Rlis(SP) 

ISAVE R1 

1984 

§11232 

0102*6 




MOV 

R2 , * { SP J 

ISAVE R2 

1985 

§11234 

016701 

000302 



MOV 

0MTDAT|R1 

) GET POINTER TO DATA 

|986 

§112*0 

016700 

000300 



MOV 

DMPTR,R0 


1987 

§11244 

105777 

170070 



TSTB 

0DMCSR 

1 DONE SET? 

1988 

§11250 

100402 




BMI 

PMRINA 

IBRANCH IF SET 

1989 

§11292 

104000 




HLT 


IFALSE INTERRUPT 

1990 

§11294 

000434 




BR 

dmrinx 

IGO TO EXIT 

1991 

§11256 

005710 



DMRINAI 

TST 

<R0> 

itest for valid data entry 

1992 

§11260 

100404 




BMI 

OMR I NC 

IBRANCH IF VALID DATA ENTRY 

|993 

§11262 

104000 




HLT 


INO VALID DATA ENTRY 

1994 

§112*4 

000430 




BR 

DMRINX 

IGO TO EXIT 

£995 

§11266 

005710 



OMR I NB 1 

TST 

<R0> 

IVALID DATA ENTRY? 

1996 

§11270 

100026 




BPL 

DMRINX 

IEXIT JF NQ MORE ENTRIES 

1997 

§11272 

032710 

017000 


OMR INC) 

BIT 

#17000, <R0> 

ILINE ZERO 

1998 

§11276 

001011 




BNE 

qmrind 


1999 

§11300 

116102 

014606 



MQVB 

PR0CTS ( R1 ) , R2 

1 GET DATA 

1000 

§11304 

046702 

000230 



B J C 

DMMSK.R2 

ICLEAR NON TRANSMITTED BITS 

2001 

§11310 

121002 




CMPB 

(R0I.R2 

ICOMPARE RECEIVED & TRANSMITTED DATA 

2002 

§11312 

001401 




BED 

,44 


2003 

§11314 

104000 




HIT 


1 ERROR I INCORRECT DATA 

2004 

§11316 

105267 

000220 



I NCB 

DMTDAT 

•| FORM WHAT NEXT RECEIVED CHAR f , SHOULD BE 

2005 

§11322 

005010 



OMR INO 1 

CLR 

(R0) 

1 CUR TUMBLER TABLE ENTRY 

2006 

§11324 

020027 

011776 



CMP 

R0,#TUMTA8+176 

ns pointer at The end of the table 

2007 

§11330 

001002 




BNE 

,+6 


2008 

§11332 

012700 

011576 



MOV 

#TUMTAB»2 I R0 


1009 

§11336 

005720 




TST 

(R0>* 

ICLEAR ENTRY and INCREMENT POINTER 

1010 

§11340 

010067 

000200 



MOV 

R0.DMPTR 

JRESTQRE POINTER 

tali 

§113*4 

000750 




BR 

dmrinb 

1 LOOK AT NEXT ENTRY 

1012 

§11346 

012602 



OMRINXI 

MQV 

( SR ) 4 , R2 

IRESTORE R2 

2013 

§11350 

012601 




MQV 

( SP) 4, R1 

1 RESTORE R1 

2014 

§11352 

012600 




MOV 

( SP ) 4 i R0 

IRESTORE R0 

1015 

§11394 

042777 

000200 

167756 


BIC 

#,DONE|0OMCSR 

ICLEAR DONE FLAG 

2016 

§11362 

012767 

000001 

021524 


MQV 

#1, WATCQM 


2017 

§11370 

000002 




RT! 



2018 






1 DM11 

TAGS AND CORE TABLE 


tin 


011400 




t?’, 1377*1 

iset assembler location counter 

2021 








ITO X XXX XXX X00 000 000 

2022 









2023 

§11400 

000000 



dmcati 

0 


IRESERVE 16'. WORDS F cR 

2024 

1025 

2026 


011440 




, »DMCATf32| 

icurrent address table 

§11440 

000010 



dmwcti 

0 


IRESERVE 16. WORDS FqR 

1027 


011500 




,*BMwcT432 r , 

IWORD COUNT TABLE . 

2028 









2029 

§11500 

000000 



ombati 

0 


IRESERVE 16. WORDS F OR 

2030 


011540 




,«DMBAT+32; 

ibit assembly table 



GENERAL' TEST PROGRAM MACYU',«4 24*QCTw73 20 1 20 PAGE 42 

D20GAC i Pll DMll- ASYNCHRONOUS. MULTIPLEXER INTERRUPT SERVICE 


8031 

8032 

8033 

8034 

8035 

8036 

8037 

8038 

8039 

8040 

8041 

8042 

8043 

8044 

8045 

8046 

8047 

8048 

8049 
1050 
8051 
1052 

8053 

8054 

8055 

8056 

8057 

8058 

8059 

8060 
1061 
8062 

8063 

8064 

8065 

8066 
2067 


177400 


8069 

2070 

2071 

2072 

2073 

2074 

2075 

2076 
8077 

2078 

2079 

2080 
2081 
2082 
2083 
2034 


PU 540 
211542 
011544 
011546 177777 

011600 

011600 000000 
012000 


000001 


000200 


020000 

040000 


5)12000 

012004 

112006 

112010 

9)12016 

9)12020 

9)12024 

9*12032 

9)12034 

9*12040 

9*12042 

9*12050 

9*12052 

9)12056 

9)12064 

9*12072 

9*12074 

9)12102 

9)12110 

112112 

9*12116 

9)12120 

9*12126 

512134 

118142 

9)12144 

9*12146 

9*12150 


000240 


105777 

100401 

104000 

026727 

001415 

005267 

026727 

001403 

005267 

000435 

012767 

000431 

005067 

012737 

012777 

000002 

012737 

026727 

001403 

005267 

000403 

012767 

016767 

016777 

000002 


167116 


000134 

000124 

000114 

000104 


000072 

012074 

000012 

012000 

000040 

000030 


000014 

000004 


DMMSK | 177400 

DMfDAT I 0 
DMPTRI 0 

dmbarimi.i 

, §DMBAY 4 - 64 ', 
TUMTABI 


• iTUMT AB*128, 
I EQUATES 

,Gon 
.MA1NTM 
,R!E«100 
,OONE«200 
, T IE»10000 
, QVRUN«20000 
, NEXM0000 
, READYH00000 
,DMPRTVs240 


000117 

000137 


000040 000074 


000200 

167032 


000200 

000137 


000020 

000010 

166762 


LP3I 
L P 4 I 

LPJN2I 


LP5J 

LPi) 

LP 2 J 

CURPAT j 
SOLPATl 
CLINCH 


TSTB 

BMI 

HLY 

CMP 

BEQ 

INC 

CMP 

BEQ 

INC 

BR 

MOV 

BR 

CLR 

MOV 

MOV 

RT! 

MOV 

CMP 

BEQ 

INC 

BR 

MOV 

MOV 

MOV 

RT! 

0 


•LPCSR 

»*4 

CLINCT i #79 V | 
LP4 

CLINCT 
CURPAT, #137 
LP3 

CURPAT 

LP2 

440.CURPAT 

LP2 

CLINCT 

#LPIN2,P#200 

#12,PLPQBR 

#LPINTR,*#200 
SOLPAT j #137 
LP5 

SOLPAT 

LP1 

440, SOLPAT 
SOLPAT, CURPAT 
CURPAT, PLPDBR 


ICMARACTER MASK (8 BIT) 

I BYTE COUNTER 

isoftware tumble table pointer 

JlNJTIALiXE TO TRANSMIT ALL LINES 


J RESERVE 64, WORDS 
IFOR TUMBLE TABLE 


iSBTTL LINE PRINTER INTERRUPT SERVICE 
LPJNTRi 


itest for Flag 

I FALSE RETURN PROM MAIN LINE 

ITEST FOR END OF LINE 

IGO GENERATE CR/LF 

IINCREMENT LINE POSITION COUNT 

ITEST FOR MAXIMUM PATTERN 

I YES * GO TO LP3 AND RESET 

INO - INCREMENT TO NEXT PATTERN 

IGO SEND IT TO LINE PRINTER 

f RESET PATTERN AND SEND TO PRINTER 

I SENT TO LINE PRINTER 

IRESET LINE COUNT 

(LINE FEED 


j start of Line pattern 

IINCREMENT START OP LINE 

IRESET START OF LINE 
jstart of line to current 
I CURRENT PATTERN TO LINE PRINTER 
IRETURN TO MAIN LINE 
I CURRENT CHARACTER BEING PRINTED 
JSTART OF LINE CHARACTER 
IPOSITION OF LINE 


.SBTTL OECTAPE INTERRUPT SERVICE 
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8085 


00000* 



RD*4 



JREAD data 

8086 


000014 



WDil4 



IWRITE DATA 

2087 


000002 



R8c2 




2088 


000002 



BR«2 



JREAD BLOCK 

2089 


000000 



F«0 



J FORWARD 

209.0 


000100 



IEA100 



1 INTERRUPT ENABLE 

2091 


000001 



OOAl 



I DO • THE FUNCTION 

2092 


004000 



R«2000 



1 REVERSE 

8093 

9*12152 

000000 



TCFLAGi 

0 


1 FLAG IS TESTED IN SCOPE 

2094 

9*12154 

000000 



TCSTATi 

0 


IDECTAPE PS 

2095 

2096 

9*12156 

000000 



tcpirsti 

0 

JFlRST BLOCK TO BE SEARCHED F q r 

2097 

9)12160 

001101 



TCLaSTI 

577, 


I LAST BLOCK TO BE SEARCHED FOR 

2098 

9)12162 

000000 



TCEXPEl 

0 


1 THE: BLOCK THAT AS EXPECTED 

2099 





IGO TO 

FORWARD 

END ZONE 


2100 

9*12164 

012767 

012164 

166022 

Tcin 

MOV 

PTClt, TClV 

1 END zone vector setup 

2101 

9*12172 

005777 

167052 



TST 

PTCST 

ITEST FOR END ZONE 

2102 

9*12176 

100403 




BMI 

FEND1 

1 AT END ZONE? 

2103 

9)12200 

105277 

1670*2 



I NCB 

&TCCM 

J SET DO * NO DELAY 

2104 

9*12204 

000002 




RT! 


INO « wait some more 

2105 

9*12206 

012767 

012236 

166000 

FEND! | 

MOV 

PTCFl, TCI V 

IYES * NEW VECTOR 

2106 

9)12214 

042777 

10*000 

.167024 


8 I C 

P104000.PTCCM 

isearch block forward 

2107 

9)12222 

016767 

177730 

177732 


MOV 

TCFIRST.TcEXPE 

JCOUNT WHEN THIS BLOCK IS FOUND 

2108 

9*12230 

105277 

167012 


TCPlAI 

I NCB 

PTCCM 

1 SET 00 

2109 

9*12234 

000002 




RT! 


j return on next block 

2110 

9*12236 




TCFll 




2lii 

9*12236 

032777 

100200 

167002 


BIT 

#100200 , PTCCM 

jany error on read? 

2112 

9*12244 

100001 




RPL 

,♦4 


2113 

9*12246 

10*000 




hlt 


ITC ERROR SET P FORWARD READ BLOCK 

2114 

9*12250 

001001 




BNE 

,** 

1 DONE FLAG UP? 

2115 

9*12252 

10*000 




HLT 


jfalse interrupt 

2116 

9*12254 

027767 

166772 

177700 


CMP 

PTCDT,TCEXPE 

IIS THIS OUR BLOCK FOR SYNC 

2117 

9*12262 

002762 




rlt 

TCF1A 

INO-READ SOME MORE BLOCKS 

2118 

9*12264 

001*01 




BEQ 

TCF2 

IYES 

2119 

9*12266 

10*000 




HLT 


1 WE PASSED THE BLOCK 

2120 

9*12270 

012767 

01230* 

165716 

TCP2I 

MOV 

PTCF3.TCIV 

J VECTOR FOR SEQUENTIAL READS 

2121 

9)12276 

105277 

1667** 



I NCB 

PTCCM 

J SET DO 

2122 

9*12302 

000002 




RT! 


J RETURN AND TEST SEQUENTIAL BLOCKS 

2123 

2124 





iFfNP SEQUENTIAL BLOCK AT FqrWARO 

direction 

2125 

9*12304 




TCF3I 




2126 

9*12304 

032777 

100200 

166734 


BIT 

#100200, *TCCM 

ITEST ERROR AND READY 

2127 

9*12312 

100001 




BPL 

i*4 


2128 

9*12314 

10*000 




HLT 


JFORWARD READ ERROR Tcill 

2129 

9*12316 

001001 




BNE 

i *4 


2130 

9*12320 

10*000 




HLT 


JFALSE INTERRUPT ON TCsll 

2131 

9*12322 

027767 

166724 

177630 


CMP 

PTCDT.TCLAST 

1 HAVE WE TESTED ALL BLOCKS 

2132 

9*12330 

001*1* 




BEQ 

RENDZ 

IYES DRIVE UNIT IN END ZONE TO START 

2133 

9*12332 

005267 

177624 



INC 

TCEXPE 

JNO-INCREMENT EXPECTED COUNT 

2134 

9*12336 

027767 

166710 

177616 


CMP 

0TCDT,TCEXPE 

IIS CURRENT BLOCK CORRECT 

2135 

*123*4 

001*01 




BEQ 

« *4 


2136 

9*123*6 

10*000 




HLT 


JFA1LED IN FORWARD READ TO FIND NEXT 

2137 

9*12350 

000*32 




BR 

TCWBK 

JTMIS ROUTINE WRITES A BLOCK 

2138 

9*12352 

105277 

166670 


TCF4I 

l NCB 

4TCCM 

1 SET DO 



SENEGAL *eST PROGRAM MACYU',624 24*0CTi73 20120 PAGE 44 

DZflGAC'.Pil DECTAPE INTERRUPT SERVICE 


8139 

21123*6 

*00002 




RT! 



2140 

*12360 

000701 



XTCllI 

BR 

TCU 

i indirect link 

2141 









2142 





I MOVE 

TAPE TO 

REVERSE END *OmE 


2143 

*12362 

012767 

012362 

169624 

REN02I 

MOV 

#HENP2iTCIV 

1 END 20NE VECTOR SETUP 

2144 

*12370 

016767 

177964 

177564 


MOV 

tclast , tce x pe 

1 SET UP FOR REVERSE SEARCH 

214$ 

*12376 

005777 

166646 



TST 

P.T CST 

{ IN END HONE 

2146 

812402 

100403 




BM I 

rendi 

I YES . START TO TURN UNIT AROUND 

2147 

212404 

105277 

166636 



INCB 

«TCCM 

1 SET DO 

2148 

*12410 

0000*2 




RT! 


1 NO * WAIT TILL WE APE 

2149 

*12412 

016777 

166642 

166626 

RENDll 

MOV 

TCDRV ( 8 >TCCM 

iselect DRIVE to be tested 

2190 

*12420 

098777 

004103 

166620 


BIS 

#R+»E+RB+D°*»TeCM 

JFUNCTION a. READ BLOCK, REVERSE AND GO 

2191 

*12426 

012767 

012924 

165560 


MOV 

#TCR1,TC!V 

{SET UP NEW INTERRUPT VECTOR 

2192 

*12434 

000002 




RT! 



2193 









2194 





IWRITE 

FORWARD 

all b, locks except 0 

pTCWBI, TCI V 


2155 

*12436 

012767 

012470 

165550 

TCW0K| 

MQV 

{INTERRUPT VECTOR EOR WRITE 

2156 

*12444 

018777 

177400 

166602 


MOV 

#<*400, PTCWC 

1 ONE BLOCK 

2157 

*12492 

018777 

012790 

166976 


MOV 

#TCWBUE|*TCBA 

J THE WRITE BUFFER ADDRESS 

2158 

*12460 

118777 

000119 

166560 


MQVB 

PlE + WD*DO,(4TCCM 

IWRITE THE SLOCK 

2159 

*12466 

000002 




RT I 


{RETURN WHEN BLOCK IS WRITTEN 

2160 

*12470 

017767 

166994 

177456 

TCWB1I 

MQV 

pTCST.TCSTAT 


2161 

*12476 

005777 

166944 



TST 

ptccm 

{ANY ERRORS 

2162 

*12502 

100001 




BPl 

, *4 


2163 

*12904 

104000 




hlT 



2164 

*12506 

012767 

012304 

169500 


MOV 

#TCF3,TCIV 

{SEARCH RLQCK VECTOR 

2165 

*12914 

112777 

000102 

166524 


MQVB 

#IE*RB|PTCCm 

{READ BLOCK 

2166 

*12522 

000713 




BR 

TCT4 

{FIND THE NEXT BLOCK 

2167 

*12524 

017767 

166920 

177422 

TCR1I 

MQV 

PTCST.TCSTAT 


2168 

*12532 

032777 

100200 

166506 


BJT 

#100200 1 <*TCCM 

{TEST FOR ERROR AND READY 

2169 

*12540 

100001 




BPl. 

,♦4 

1170 

*12542 

104000 




w l*T 


JDECTAPE ERROR ON READ BLOCK REVERSE 

2l7i 

*12944 

001001 




BNE 

1 *4 


2172 

*12546 

104000 




HUT 


{FALSE INTERRUPT FROM DECTAPE 

2173 

*12550 

027767 

166476 

177404 


CMP 

•TCDTjTCEXPE 

ns IT OUR FIRST BLOCK 

2174 

*12556 

001406 




BEQ 

TCR 2 

jyes * go Test the res.t 

2175 

*12960 

002002 




BGE 

TCRlA 

{NO * HAVE WE PASSED THE BLOCK 

2176 

*12562 

104000 




HLT 


JWE PASS OUR BLOCK 

2177 

*12564 

000676 




BR 

REND2 

{GO TO END ZONE AND TRY AGAIN 

2178 

*12566 

105277 

166494 


TCR1AI 

INCB 

PTCCM 

{SET DO 

2179 

*12972 

000002 




RT! 


jwe found our first block 

2180 

*12974 

012767 

012610 

165412 

TCR2I 

MOV 

#TCR3 , YC I V 

{SET UP INTERRUPT TO TEST ALL BLOCKS 

2181 

*12602 

105277 

166440 



INCB 

5»TCCM 

{SET DO 

2182 

2183 

2184 

*12606 

000002 




RT I 


{WAIT FOR NEXT BLOCK TO INTERRUPT 





>r?ND 

sequential block in reverse 

Direction 

2185 

*12610 




TCR3I 




2186 

*12610 

032777 

100200 

166430 


BIT 

#100200, RTCCM 

itest for read and error 

2187 

*12616 

100001 




BPL 

, *4 


2188 

*12620 

104080 




HLT 


{ERROR READING SEQUENTIAL BLOCK IN REVERSE 

2189 

*12622 

001001 




BNE 

,*4 


2190 

*12624 

104000 




HLT 


J FALSE DECTAPE INTERRUPT 

2191 

*12626 

026777 

177324 

166416 


CMP 

TCP JRST 1 ®TCDt 

{DID WE DO ALL THE BLOCKS 

2192 

*12634 

001691 




BEQ 

XTClt 

JYES - GO TO END HONE To RESTART 






GENERAL’ Test PROGRAM 

MACYU.624 ?4*QCT*73 

20|20 1 

9 AGE 45 


020040'; 

PU 

DECTAPE 

interrupt service 




|19 3 

*18636 

005367 

177320 



DEC 

TCEXPE 

{NO 9 DECREMENT BLOCK NUMBER 

1194 

*1*642 

029767 

166404 

177312 


CMP 

®TCdT,TCEXPe 

itest sequential block in reverse 

*195 

*18690 

00i401 




BEQ 

, *4 


*196 

*18652 

104000 




HLT 


{TEST SEQUENTIAL READ BLOCK IN REVERSE FAILED 

1197 

*18654 

000403 




BR 

TCRBK 

{THIS ROUTINE READ A BLOCK 

1198 

*18656 

105277 

166364 


TCR4I 

INCB 

$TCCM 

JSET DO 

*199 

*18662 

000002 




RT! 


{LETS TRY A NEW BLOCK 

*200 









2201 





{READ REVERSE ALL BLOCKS EXCEPT BLOCK 

1101 

*202 

*18664 

012767 

018722 

165322 

TCRBKI 

MOV 

#TCRBl, TCI V 

JSET UP INTERRUPT VECTOR 

*203 

*18672 

018777 

177400 

166354 


MOV 

#.40F 1 »TCWC 

{READ ONE BLOCK 

*204 

*18700 

012777 

012750 

166350 


MOV 

#TCRBUF,RTCBA 

{WHERE BUFFER IS 

*205 

*18706 

112777 

000105 

166332 


MQVB 

#lE«fRD*DO,<*TCCM 

{READ THE BLOCK 

*206 

*18714 

005267 

17723? 



INC 

TCFLAG 

{TESTED IN SCOPE ROUTINE 

*207 

*18780 

000002 




RT! 


{EXIT 9 RETURN WHEN BLOCK IS READ 

*208 

*18782 




TCRB1I 




*209 

*12782 

005777 

166320 



TST 

«TCCM 

1 AND ERRORS 

*210 

*18726 

100001 




BPL 

,♦4 


*211 

*18730 

104000 




HLT 


idectape error 

*212 

*18732 

012767 

012610 

165254 


MOV 

#TCR3,TCIV 

{NEW VECTOR FOR BLOCK SEARCH 

*213 

*18740 

112777 

00010? 

166300 


MQVB 

#Je*rb,ptccm 

{READ BLOCK FUNCTION 

1214 

*18746 

000743 




BR 

TCR4 

{RETURN TO BLOCK SEARCH 

*215 









*216 





iTHtS WRtTE BUFFER LOOKS THE SAmE FqRWARO or REVERSE 

*217 

*12790 




TCWBUFI 




*218 

*12750 




TCRBUFI 




*219 

*12750 

000001 

177777 



li«l 



*220 

*18754 

000002 

177776 



2, *2 



*221 

*18760 

000003 

177775 



3,t3 



*222 

*18764 

000004 

177774 



4 1 *4 



8223 

*12770 

000005 

177773 



5, .5 



*224 

*18774 

000006 

177772 



6, *6 



*225 

*13000 

000007 

177771 



7, .7 



*226 

*13004 

000010 

177770 



101 *10 



*287 

*13010 

000011 

177767 



Hi *11 



*228 

*13014 

000012 

177766 



12,»12 



*289 

*13080 

000013 

177765 



13,.13 



1230 

*13084 

000014 

177764 



14,914 



*231 

*13030 

000015 

177763 



15,915 



1232 

*13034 

000016 

17776? 



16,916 



*233 

*13040 

000017 

177761 



17, .17 



1234 

*13044 

000020 

177760 



20,920 



*235 

*13050 

000081 

177757 



21, .21 



1236 

*13054 

000082 

177756 



22, .22 



8237 

*13060 

000083 

177755 



23, .23 



*238 

*13064 

000084 

177794 



24,.24 



*239 

*13070 

000025 

177753 



25,925 



8240 

*13074 

000026 

177752 



26,.26 



*241 

*13100 

000027 

177751 



27,927 



8242 

*13104 

000030 

177790 



30, .30 



8243 

*13110 

000031 

177747 



31,931 



8244 

*13114 

000032 

177746 



32,.32 



8245 

*13180 

000033 

177745 



33,-33 



8246 

*13184 

000034 

177744 



34,934 






GENERAL 

test program 

MACYXl‘,624 24.0CT.73 

20|20 PAGE 

D2QGAC » 

Pii 

0ECT4PE 

INTERRUPT service 


8247 

*1*130 

000035 

177743 

35| *35 

8248 

813134 

000036 

177742 

36,-36 

8249 

013140 

0000-37 

177741 

3* | .37 

8250 

013144 

000040 

177740 

40, .40 

8251 

013150 

000041 

177737 

41,«41 

8252 

013154 

000042 

177736 

42,1*42 

8253 

013160 

000043 

177735 

43 , .43 

8254 

013164 

000044 

177734 

44 , f 44 

8255 

013170 

000045 

177733 

45,»45 

8256 

013174 

000046 

177732 

46, *46 

8257 

013200 

000047 

177731 

47, .47 

8258 

813204 

000050 

177730 

50, .50 

8259 

013210 

000051 

17*727 

51,. 51 

8260 

013214 

000052 

177726 

52, .52 

8261 

013220 

000053 

177725 

53, *53 

8262 

013024 

000054 

177724 

54, *54 

8263 

013230 

000055 

177723 

55, *55 

8264 

013234 

000056 

177722 

56, *56 

8265 

013240 

000057 

177721 

57,. 57 

8266 

013244 

000060 

177720 

60, *60 

8267 

013230 

000061 

177717 

61, *61 

8268 

813254 

000062 

177716 

62, *62 

8269 

0132*0 

000063 

177715 

63, *63 

nh 

013264 

000064 

177714 

64, .64 

82*1 

013270 

000065 

177713 

65 1 *65 

82*2 

013274 

000066 

177712 

66, *66 

82*3 

01337)0 

000067 

1777U 

67, *67 

82*4 

013304 

000070 

177710 

70 , *70 

82*5 

013310 

000071 

177707 

71, *71 

82*6 

013314 

0000*2 

177706 

72, *72 

82*7 

013380 

000073 

177705 

73, *73 

82*8 

013384 

000074 

177704 

74, *74 

82*9 

013330 

000075 

177703 

75, *75 

8280 

013334 

000076 

177702 

76, *76 

8281 

013340 

000077 

177701 

77, *77 

8282 

013344 

000100 

177700 

102i*100 

8283 

013350 

177700 

000100 

.100,100 

8284 

013354 

17*701 

000077 

.77,77 

2285 

013360 

17*702 

000076 

.76,76 

8286 

013364 

177703 

000075 

.75,75 

2287 

013370 

17*704 

000074 

*74,74 

8288 

013374 

17*705 

000073 

• 73,73 

2289 

013400 

177706 

000072 

m 72,72 

2290 

013404 

177707 

000071 

.71,71 

8291 

813410 

17*710 

000070 

*70,70 

8292 

013414 

1**711 

000067 

*67,67 

8293 

013420 

177712 

000066 

*66,66 

8294 

013424 

177713 

000065 

*65,65 

2295 

013430 

177714 

000064 

*64,64 

2296 

013434 

177715 

000063 

*63,63 

8297 

813440 

177716 

000062 

*62,62 

2298 

013444 

177717 

000061 

*61,61 

2299 

013450 

177780 

000060 

.68,60 

2300 

013454 

17*781 

000057 

.57,57 


GENERAL’ 

test program 

HACY11*. 

684 24.0CT.73 

20J20 PAGE 47 

0 Z 8 G A C « 

pii 

OECTAPE 

interrupt service 


8301 

013460 

179722 

000056 


.56,56 

8302 

013464 

177723 

000055 


.55,55 

8303 

013470 

177724 

000054 


.54,54 

8304 

013474 

177725 

000053 


.53,53 

8305 

013500 

177726 

000052 


*52,52 

8306 

013504 

170727 

000051 


*51,51 

8307 

013510 

177730 

000050 


*50,50 

2308 

013514 

177731 

000047 


*47,47 

8309 

013520 

177732 

000046 


*46,46 

2310 

013524 

177733 

0000*5 


*45,45 

8311 

013530 

177734 

000044 


*44,44 

8312 

013534 

177735 

000043 


.43,43 

8313 

013540 

177736 

0000*2 


.42,42 

8314 

013544 

177737 

0000*1 


*41,41 

8315 

013550 

177740 

000040 


.40,40 

8316 

013554 

177741 

000037 


.37,37 

8317 

013560 

177742 

000036 


.36,36 

8318 

013564 

177743 

000035 


• 35,35 

8319 

013570 

177744 

000034 


.34,34 

8380 

013574 

1777«5 

000033 


.33,33 

8381 

013600 

177746 

000032 


*32,32 

8382 

013604 

177747 

000031 


.31,31 

2383 

013610 

177750 

000030 


.30,30 

8384 

013614 

177751 

000027 


.27,27 

8325 

013620 

177752 

000026 


*26,26 

8386 

013624 

177753 

000025 


*25,25 

8327 

013630 

177754 

000024 


.24,24 

8388 

013034 

177755 

000023 


*23,23 

8329 

013690 

177756 

000022 


.22,22 

1330 

013644 

177757 

000021 


.21,21 

8331 

013650 

177760 

000020 


.20,20 

8332 

013654 

177761 

000017 


*1M7 

2333 

013660 

177742 

000016 


*16,16 

8334 

013664 

177763 

000015 


.15,15 

8335 

013670 

177764 

000014 


.14,14 

2336 

013674 

177765 

000013 


.13,13 

8337 

013700 

177766 

000012 


.12,12 

2338 

013704 

177767 

000011 


.11,11 

2339 

013710 

177770 

000010 


.10,10 

2340 

013714 

177771 

000007 


.7,7 

2341 

013720 

177772 

000006 


.6,6 

2342 

013724 

177773 

000005 


.5,5 

2343 

013730 

177774 

000004 


.4,4 

2344 

013734 

177775 

000003 


.3,3 

2345 

913740 

177776 

000002 


*2,2 

2346 

013744 

177777 

000001 


*1,1 

2347 

8348 




’iSlTTL 

BUS TESTER SECTION : 

8349 






2350 




1 DEVI CE 

one npr,datip,dato, 

2351 

013750 

205777 

165524 

BUST1I 

TST 9ABCSR 

2352 

013754 

100001 



BPL , *4 

8353 

013756 

104020 



HIT 

2354 

013760 

026767 

000072 

000072 

CMP REClA.EXPlA 


I TEST FOR BUSY DOWN 

I BUSY NOT DOWN 
JTRANSFER QONE CORRECTLY 



GENERAL TEST program MACYir,624 3?4*»OCT473 20120 RAGE 48 

BZeGACiPil BUS t e ster section 1 interrupt service 


2355 

213766 

001401 




BEQ 

, *4 


2356 

113770 

104000 




WLT 


IDATIP •» DAtO ERROR 

2357 

213772 

005267 

000096 



INC 

SEN01A 

INEW DATA SENT 

2358 

213776 

016767 

000092 

000052 


MOV 

SENDl A i REC1A 


2359 

214004 

016767 

000044 

000046 


MOV 

SENDIAiEXPIA 

1 SET UP OATa 

2360 

21R012 

006367 

000042 



ASL 

expia 

1 EXPECTED BACK 

2361 

014016 

012777 

000002 

165452 


MQV 

#2,PABWC 

1 SET UP TESTER 

1362 

219024 

012777 

014096 

169442 


MOV 

#REC1A,*A0CA 


2363 

219032 

005077 

165442 



CLR 

pabcsr 


2364 

219036 

012777 

0455U 

169434 


MOV 

#45511, 6ABCSR 

/LEVEL SIX 

2365 

219094 

012767 

000001 

016472 


MOV 

#1 , HATCAS 


2366 

214092 

000002 




RTI 



2367 

219054 

000000 



SENQlAi 

0 


J SENT 

2366 

214056 

000000 



REC1AI 

0 


JRECEIVED 

2369 

219060 

000000 



EXP1AI 

0 


/EXPECTED 

2370 









2371 





iSBTTL 

BUS 

TESTER SECTION 2 INTERRUPT 

service 

1372 









2373 





JDfcVJCE 

TWO. 

INTR 7, DLYH00 US 


2374 

214062 

012767 

000001 

016470 

BUST2I 

MOV 

#1, watcbb 


2375 

214070 

000002 




RTI 


/EXIT ON INTERRUPT 

2376 

2377 





iSSTTL 

BUS 

TESTER SECTION 3 INTERRUPT 

service 

2378 









2379 





1200 WORD TRANSFER USING THE BPS TESTER 

2360 





i sect ion three a delayed 


2361 

214072 

005777 

165432 


CBUS1I 

TST 

•PBCSR 


2382 

214076 

100775 




BM J 

CBUS1 


2363 

214100 

012777 

000200 

169410 


MOV 

#200,»CBWC 

/WORD COUNT 

2364 

214106 

012777 

014240 

169400 


MOV 

#cbbuf,»cbca 

/CURRENT ADDRESS 

2385 

219114 

005077 

165400 



CL.R 

pcbcsr 


2386 

214120 

052767 

000040 

163690 


BIS 

#40 , PS 

/RAISE PROCESSOR TO LEVEL 5 

2387 

214126 

012777 

052615 

169364 


MOV 

#92615, 6CBCSB 

JNPR, DATO, P5 

2366 

214134 

012767 

000001 

016440 


MOV 

#1 , WATCCB 


2389 

214142 

000002 




RTI 


/RETURN TO MAIN LINE CODE 

2390 

214144 

005777 

165?50 


BUST 3 1 

TST 

iCBCSR 

/BUSY SHOULD BE DOWN 

2391 

214150 

100001 




BPL 

, *4 


2392 

214152 

104000 




HIT 


/PAUSE INTERRUPT OP BUSY NOT DOWN 

2393 

214154 

012767 

014240 

000052 


MOV 

#cbbuf,cbcta 

/BUFFER' ADDRESS 

2394 

214162 

012767 

000200 

000046 


MOV 

#200,CBCT8 

JUENGTH of buffer 

2395 

214170 

042767 

000040 

163600 


BIC 

#40 | PS 

ZUQWER PRIORITY TO LEVEL 4 

2396 

214176 

027767 

000032 

000032 

CBUS3I 

CMP 

»CBCTA,CBCTB 

/COMPARE THE DATA 

2397 

214204 

001401 




BEG 

1*4 


2398 

214206 

104000 




HUT 


/DATA ERROR 

2399 

214210 

005177 

000020 



COM 

PCBCTA 

J M I X UP OLD DATA 

2400 

714214 

062767 

000002 

000012 


ADO 

#2,CBCTA 

/BUFFER POSITION 

2401 

§14222 

162767 

000002 

000006 


SUB 

#2, CBCT8 

/DATA COUNTER 

2402 

214230 

001720 




BED 

CBUS1 

/RESTART WHEN BC#0 

2403 

714232 

000761 




BR 

CBUS3 

/FINISH THE REST 

2404 

§14234 

000000 



cbcSta i 

0 


J BUFFER POSITION 

2405 

714236 

000000 



CBfiTBj 

0 


/DATA 

2406 

§14240 

000000 



CBIUFI 

0 



2407 


014240 



DBBUFfCBBUP 



2408 


014492 



,S>210 
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OZQGAC i Pil BUS TESTER SECTION 3 INTERRUPT SERVICE 


2409 









2410 





, SBTTU 

BUS TESTER SECTION 4 INTERRUPT 

SERVICE 

2411 





) 200 WORD TRANSFER USING THE BUS TESTER 


84i2 





> sect i i 

3N FOUR 

A NO DEUAY 


2413 

§14492 

005777 

169040 


PBUSi! 

TST 

•CBC5R 


2414 

§14456 

100779 




BM! 

DBUS1 


2415 

§14460 

012777 

000200 

165040 


MQV 

#200,PDBWC 

/WORD COUNT 

2416 

§14466 

012777 

014240 

165030 


MQV 

#DBBUF,PDBCA 

/CURRENT ADDRESS 

2417 

§14474 

009077 

169030 



CUR 

PDBCSR 


2418 

§14900 

012777 

052649 

165022 


MOV 

#92649 , PObCSR 

INPR, DATO, P4 

2419 

§14506 

012767 

000001 

• 016102 


MOV 

#1, WATOQB 


2420 

§14514 

000002 




RTI 


/RETURN TO MAIN LINE CODE 

2421 

§14516 

009777 

169006 


BUST 4 | 

TST 

PQBCSR 

/BUSY SHOULD BE SOWN 

2422 

§14522 

100001 




BPL 

,*4 


2423 

§14524 

104000 




HIT 


/FALSE INTERRUPT OR BUSY NOT 

1424 

§14526 

000751 




BR 

OBUSi 

INOP FOR COMPARE 

2425 

§14930 

012767 

014240 

000044 


MOV 

#PBBUF,OBCTA 

/LENGTH OF BUFFER 

2426 

§14936 

012767 

000200 

000040 


MOV 

#200, DBCTB 

/length of buffer 

2427 

§14944 

027767 

000032 

000032 

0BPS3I 

CMP 

PDBCTA.DBCTB 

/COMPARE THE DATA 

2428 

§14952 

001401 




BEQ 

, *4 


2429 

§14954 

104000 




MUT 


/DATA ERROR 

2430 

§14996 

009177 

000020 



COM 

POBCTA 

/MIX UP OLO DATA 

2431 

§14962 

062767 

000002 

000012 


ADD 

#2, DBCTA 

/buffer position 

2432 

§14970 

162767 

000002 

000006 


SUB 

#2 , DBCTB 

/ DATA COUNTER 

2433 

§14976 

001729 




BED 

OBUSI 

JRESTART WHEN BC»0 

2434 

§14600 

000761 




SR 

0BUS3 

/FINISH THE REST 

2435 

§14602 

000000 



DBfiT A I 

0 


/BUFFER POSITION 

2436 

§14604 

000000 



OBfiTB 1 

0 


/DATA 

2437 
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dzqgac'.pu 

BASIC 

Instruction test 





2438 





.SbTTL 

BASIC 

INSTRUCTION T£ct 


2439 









2440 

*14606 

*12706 

036520 


PRqCTS'I 

MOV 

#STACK,SP 

i set up stack for current mooe 

2441 

*14612 

012767 

014626 

164244 


MOV 

#TEST0, RETURN 

1 FOR SCOPING 

2442 

*14620 

012767 

004000 

164210 


MOV 

#4000, ICOUNT 

J iteration count 

2443 









2444 





.SBTTL 

TEST i 

COMPARE INSTRUCTION 

INDEXED 

2445 









2446 

*14626 

012700 

177770 


TEST* 1 

MQV 

#•10, R0 


2447 

*14632 

026027 

033602 

125252 


CMP 

A I RZ } , #125252 


2448 

*14640 

001401 




BEG 

n *4 


2449 

*14642 

104000 




HUT 



2450 

*14644 

104400 




SCOPE 



2431 









2452 

*14646 

*127*0 

177770 



MOV 

#»10,R0 


2453 

*14632 

*22760 

125232 

035602 


CMP 

#125252, A(R0) 


2454 

*14660 

*01401 




BEQ 

i*4 


2455 

*14662 

104000 




MU* 



2436 

*146*4 

104400 




SCOPE 



2457 









2458 

*14666 

012700 

000010 



MQV 

#10, R0 


2439 

*14672 

*26027 

035602 

052525 


cmp 

AIR0), #052525 


2460 

*14700 

*01401 




BEQ 

.*4 


2461 

*14702 

104000 




HLT 



2462 

*14704 

104400 




SCOPE 



2463 









2464 

*14706 

012700 

000010 



MQV 

#10, P0 


2465 

*14712 

022760 

052525 

035602 


Cmp 

#052525, A(Rg) 


2466 

*14720 

001401 




BEQ 

, *4 


2467 

*14722 

104000 




HLT 



2468 

*14724 

104400 




SCOPE 



2469 









2470 

*14726 

012700 

177770 



MQV 

#•10, R0 


2471 

*14732 

024060 

035602 

035602 


cmp 

AI R0 ) , a ( R0 ) 


2472 

*14740 

001401 




BEG 

, *4 


2473 

*14742 

1040*0 




WIT 



2474 

*14744 

012700 

000010 



MOV 

#+10, R0 


2475 

*14730 

026060 

035602 

033602 


CMP 

A { R0 > , A < R0 ) 


2476 

*14736 

001401 




BEQ 

, +4 


2477 

*14760 

104000 




HUT 



2478 

*14762 

104400 




SCOPE 



2479 









2480 

*14764 

*12700 

177770 



MOV 

#•10, R0 


2481 

*14770 

0127*1 

000004 



MQV 

#*4,f?l 


2482 

*14774 

026061 

035602 

033602 


Cmp 

A ( R0 } , A C Rl ) 


2483 

*13002 

001401 




BEG 

.*4 


2484 

*13004 

104000 




HLT 



2485 

*13006 

104400 




SCOPE 



2486 









2487 

*13010 

026160 

035602 

039602 


CMP 

AtRlJ , A(R0> 


2488 

*15016 

001401 




BEG 

.♦« 


2489 

*15020 

104000 




HLT 



2490 

*15022 

104400 




SCOPE 



2491 

*15024 

012700 

177774 



MOV 

#*t4,R0 
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; test program 
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D2QG AC , 

Pll 

TEST COMPARE INSTRUCTION INDEXED 


2492 

*13030 

012701 

000010 



MQV 

#+10 , Rl 

2493 

*15034 

026061 

035602 

033602 


Cmp 

A(R0> , A C Rl > 

2494 

*13042 

001401 




BEG 

.+4 

2495 

*13044 

104000 




HLT 


2496 

*13046 

104400 




SCOPE 


2497 

*15030 

012700 

177774 



MQV 

#•4,9(5 

2498 

*13094 

012701 

000010 



MQV 

#10, Rl 

2499 

*15060 

026160 

035602 

033602 


CMP 

A(R1),A(R0) 

2500 

*15066 

001401 




BEG 

, + 4 

2501 

*13070 

104000 




HLT 


2502 

*13072 

1044*0 




SCOPE 


2503 








2504 





, SBTTL 

TEST 

MOVE INSTRUCTION Pop INGE* 

2505 








2506 

*13074 

0127O0 

177770 



MOV 

#«10,R0 

2507 

*15100 

016067 

033602 

020516 


MQV 

A < R 0 ) , TEMp 

2508 

*13106 

026727 

020512 

129252 


CMP 

TEMP, #125252 

2509 

*15114 

001401 




BEQ 

,44 

2510 

*13116 

104000 




HLT 


2511 

*13120 

104400 




SCOPE 


2512 








2513 

*15122 

012700 

000010 



MOV 

#*10, R0 

2514 

*15126 

016067 

035602 

020470 


MOV 

A < R0 > , TEMP 

2515 

*13134 

026727 

020464 

052525 


CMP 

TEMP, #052525 

2516 

*13142 

001401 




BEQ 

, +4 

2517 

*15144 

104000 




HLT 


2518 

*13146 

104400 




SCOPE 


2519 








2520 

*15130 

012700 

177770 



MOV 

#«10,R0 

2521 

*13134 

012760 

125232 

033624 


MOV 

#125252, TEMPI R0) 

2522 

*13162 

026727 

020426 

123252 


CM# 

C, #125252 

2523 

*13170 

001401 




BEG 

, +4 

2524 

*13172 

104000 




HLT 


2525 

*13174 

104400 




SCOPE 


2526 








2527 

*13176 

012700 

000010 



MQV 

#+10, RZ 

2528 

*152*2 

012760 

052329 

035624 


MOV 

#052525, TEMPIR0) 

2529 

113210 

026727 

020420 

052525 


CMP 

TEMP+10, #052525 

2530 

*13216 

001401 




BEG 

, +4 

2531 

*13220 

104000 




HLT 


2532 

*13222 

104400 




SCOPE 


2533 








2534 





,s§ttl 

TEST i 

3 f c instruction For indexing 

2535 








2536 

*13224 

012767 

177777 

020372 


MOV 

#»1,TEMP 

2537 

*15232 

042767 

000000 

020364 


B l C 

#0, TEMP 

2538 

*13240 

100401 




PM 1 

,+4 

2539 

*13242 

104000 




HLT 


2540 

*13244 

001001 




BNE 

,+4 

2541 

*13246 

104000 




HLT 


2542 

*13230 

104400 




SCOPE 


2543 

*13232 

012767 

177777 

020344 


MQV 

#•1 , TEMP 

2544 

*13260 

012700 

177770 



MOV 

#•10, R0 

2545 

*13264 

046067 

035602 

020332 


BIC 

MR0),TEMR 
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8546 

*15272 

026727 

020326 

052525 

CMP 

TEMP, #052525 

2547 

*15300 

001401 



BEQ 

,★4 

2548 

*15302 

104000 



HLT 


2549 

2550 

2551 

*15304 

104400 



SCOPE 


*15306 

012767 

177777 

020310 

MQV 

#»1 , TEMP 

2552 

*15314 

012700 

000010 


MOV 

#10, R0 

2553 

*15320 

046067 

03560? 

020276 

BIG 

At R0 ) , TEMp 

1554 

*153*6 

026727 

020272 

125252 

CMP 

TEMP, #125252 

1555 

*15334 

001401 



BEQ 

,*4 

2556 

*15336 

104000 



MLT 


2557 

2558 

2559 

*15340 

104400 



SCOPE 


*15342 

012767 

177777 

020264 

MOV 

#il,TEMP*l0 

2560 

*15350 

012700 

000010 


MQV 

#10, R0 

2561 

*15354 

042760 

125*52 

035624 

BIC 

#125252, TEMPER*) 

2562 

*15362 

026727 

020246 

05*525 

CMP 

TEMP*10, #52525 

2563 

*153*0 

001401 



BEQ 

,♦4 

1564 

*15372 

104000 



WIT 


1565 

P 

*15374 

104400 



SCOPE 


*15376 

012700 

177770 


MOV 

t»10,R0 

1568 

*15402 

012767 

177777 

020204 

MQV 

#»1,TEMP*10 

2569 

*15410 

042767 

052525 

020176 

BIC 

#052525, TEMRil* 

*5*0 

*15416 

026727 

020172 

125252 

CMP 

TEMP«10, #12525* 

15*1 

*154*4 

001401 



BEQ 

,*4 

15*2 

*154*6 

104000 



HLT 


*5*3 

*5*4 

*5*5 

*15430 

104400 



SCOPE 
iSfiTTU TEST I 

subtract Instruction Por Indexing 

15*6 






15*7 

*15432 

012767 

12525* 

020164 

MQV 

#12525?, TEMP 

25*8 

*15440 

012700 

177770 


MQV 

#»10,R0 

*5*9 

*15444 

166067 

03560* 

020152 

SUB 

At R0 ) , TEMP 

1580 

*15452 

001401 



BEQ 

,♦4 

2581 

*15454 

104000 



HLT 


*582 

*583 

*584 

*15456 

104400 



SCOPE 


*15460 

012*67 

125*5* 

020136 

MOV 

#125252. TEMP 

*585 

*15466 

012700 

177770 


MOV 

#H0, R0 

*586 

915472 

166760 

020074 

035634 

SUB 

B,TEMP*10(R0) 

*567 

*15500 

001401 



BEQ 

t *4 

*588 

*15502 

104000 



HIT 


2589 

*15504 

104400 



SCOPE 


2590 

*15506 

012767 

052525 

020110 

MOV 

#05252?, temp 

8591 

*15514 

012700 

000010 


MOV 

#10, R0 

*592 

*15520 

166047 

035602 

020076 

SUB 

A t R0 ) i TEMp 

*593 

*15526 

001401 



BEQ 

,#4 

2594 

*15530 

104000 



HLT 


*595 

*15532 

104400 



SCOPE 


*596 

*15534 

012767 

052525 

020062 

MOV 

#052525, TEMp 

*59* 

*15542 

012700 

000010 


MQV 

#10,R0 

*596 

*15546 

166760 

020040 

035614 

SUB 

A*10,CtR0) 

*599 

*15554 

001401 



BEQ 

i*4 


GENERAL UST PROGRAM 
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test subtract Instruction For indexing 


2600 

115556 

104000 



HLT 


*601 

H5560 

104400 



SCOPE 


*602 







*603 





.SSTTl TEST UNARYS INPE' 

*604 







*605 

115562 

012767 

177777 

020034 

MQV 

#»1, TEMP 

*606 

115570 

012700 

177770 


MOV 

#*10,R0 

*607 

015574 

005060 

035634 


CLR 

O<R0) 

*608 

015600 

005767 

020020 


TST 

TEMP 

*609 

015604 

001401 



BEQ 

,44 

1610 

015606 

104000 



HLT 


P6il 

015610 

104400 



SCOPE 


*612 

015612 

01*767 

177777 

020004 

MQV 

#»1,TEMP 

*613 

115620 

018700 

000010 


MOV 

#*10, R0 

*614 

0156*4 

009060 

035614 


CLR 

Ct R0) 

*615 

015630 

005767 

017770 


TST 

TEMP 

*616 

015634 

001401 



BEQ 

i*4 

mi 

I HV4 

104000 

104400 



HLT 

SCOPE 


*619 

015642 

01*767 

177777 

017754 

MOV 

#*i, TEMP 

*6*0 

015650 

01*700 

177770 


MQV 

#*10, R0 

*6*1 

015654 

005160 

035634 


COM 

B(R0> 

*6*2 

015660 

009767 

017740 


TST 

TEMP 

*6*3 

015664 

001401 


BEQ 

,44 

86*4 

015666 

104000 



HLT 


1625 

015670 

104400 



SCOPE 


16*6 

015672 

01*767 

177777 

0177*4 

MQV 

#*1 , TEMP 

*6*7 

015700 

012700 

000010 


MQV 

#10, R0 

*6*8 

015704 

005160 

035614 


COM 

CtR0i 

86*9 

015710 

009767 

017710 


TST 

TEMP 

*630 

015714 

001401 


BEQ 

, *4 

2631 

015716 

104000 



HLT 


1632 

*633 

*634 

015720 

104400 



SCOPE 


015722 

012767 

177777 

017674 

MOV 

#*1 , TEMP 

*635 

015730 

012700 

177770 


MOV 

#»10, R0 

8636 

015734 

009260 

035634 


INC 

QtR0> 

*637 

015740 

005767 

017660 


TST 

TEMP 

*638 

015744 

001401 



BEQ 

,*4 

*639 

015746 

104000 



HLT 


*640 

015750 

104400 



SCOPE 


8641 

015752 

01*767 

177777 

017644 

MQV 

#«1, TEMP 

1642 

015760 

01*700 

000010 


MOV 

#♦10, R0 

1643 

015764 

005260 

035614 


INC 

C(R0> 

*644 

015770 

005767 

017*30 


TST 

TEMP 

*645 

015774 

001401 



BEQ 

,*4 

*646 

1647 

015776 

104000 



HLT 


016000 

104400 



SCOPE 


*648 

014002 

012767 

000001 

017614 

MOV 

#1, TEMP 

*649 

816010 

01*700 

177770 

MOV 

#*10, R0 

*650 

016014 

005360 

035634 


DEC 

DtR0> 

*651 

016020 

005767 

017600 


TST 

TEMP 

1652 

016024 

001401 



BEQ 

,*4 

*653 

016026 

104000 



HLT 
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2654 

816030 

104400 



SCOPE 


8635 

816032 

012767 

000001 

0l 7 564 

HOY 

#1, TEMP 

2656 

816040 

012700 

000010 


MOV 

*10, R0 

2637 

816044 

005360 

033614 


DEC 

C(R0) 

2638 

816030 

005767 

017530 


TST 

TEMP 

2639 

816034 

001401 



BED 

i *4 

2660 

816036 

104000 



HUT 


2661 

816060 

104400 



SCOPE 


2662 

816062 

012767 

000001 

017534 

MOV 

#1 , TEMP 

2663 

816070 

312700 

177770 


MOV 

8*10,R0 

2664 

816074 

003460 

035634 


NEC 

D < R0 > 

2665 

916100 

022767 

177777 

017516 

CMP 

8*1, TEMP 

2666 

816106 

001401 



BEQ 

, *4 

2667 

916110 

104000 



wlt 


2668 

816112 

104400 



SCOPE 


2669 







2670 

916114 

012767 

000001 

017502 

MOV 

81,TEmP 

2671 

816122 

012700 

000010 


MOV 

8*10, R0 

2672 

916126 

303460 

035614 


NEC 

C(R0) 

2673 

816132 

322767 

177777 

017464 

CMP 

8*1. TEMP 

2674 

916140 

001401 



BE® 

,*4 

267.5 

916142 

104000 



HUT 


2676 

916144 

104400 



SCOPE 


2677 







2678 

916146 

012767 

177777 

017450 

MOV 

#«1 , TEMP 

2679 

916154 

912700 

177770 


MOV 

8*10, R0 

2660 

916160 

000261 



SEC 


2681 

816162 

003560 

033634 


ADC 

O(R0> 

2682 

916166 

005767 

017432 


TST 

TEMP 

2683 

916172 

001401 



BEQ 

,*4 

2684 

916174 

104000 



HUT 


2685 

916176 

104400 



SCOPE 


.2686 







2687 

916200 

012767 

177777 

017416 

MOV 

8*1. TEMP 

2688 

916206 

012700 

000010 


MOV 

8*10, R0 

2689 

916212 

000261 



SEC 


2690 

916214 

005560 

033614 


ADC 

C(R0> 

2691 

916220 

003767 

017400 


TST 

TEMP 

2692 

916224 

001401 



BEQ 

,*4 

2693 

816226 

104000 



HUT 


2694 

916230 

104400 



SCOPE 


2695 







2696 

916232 

0127*7 

000001 

017364 

MOV 

81 i TE mP 

2697 

916240 

012700 

177770 


MOV 

#•10, R0 

2698 

916244 

000261 



SEC 


2699 

916246 

005660 

035634 


SBC 

D(R0) 

2700 

916252 

005767 

0173*6 


TST 

TEMP 

2701 

916236 

001401 



BED 


2702 

916260 

104000 



HUT 


2703 

2704 

2705 

916262 

104400 



SCOPE 


916264 

012767 

000001 

017332 

MQV 

81, TEMP 

2706 

916272 

012700 

000010 


MOV 

8*10, R0 

8707 

916276 

900261 



SEC 
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OiflGACiPll 

TEST UNARYS INDEXED 




2708 

916300 

003640 

035614 



SBC 

CIR0) 

8709 

916304 

005767 

017314 



TST 

TEMP 

2710 

916310 

001401 




BEQ 

, *4 

?7li 

816312 

104000 




HUT 


2712 

816314 

104400 




SCOPE 


2713 








2714 





, SBTTU 

TEST , 

jmp indexed 

2715 








2716 

916316 

012700 

000010 



MQV 

8*10, R0 

8717 

816322 

000160 

016316 



JMP 

RJMP1»10(R0> 

1718 

916326 

000240 



RJMP1I 

NQP 


2719 

916330 

104400 




SCOPE 


2720 








2721 

114332 

012700 

177770 



MOV 

8*10 i R0 

2722 

816336 

000160 

016354 



JMP 

RJMP2+10CR0) 

2723 

016342 

104000 




HUT 


2724 

916344 

0002*0 



RJMPZI 

NOP 


2725 

016346 

104400 




SCOPE 


2726 








8727 





,S§TTu 

TEST 

COMPARE INSTRUCTION 

If ZB 

2729 

016330 

023727 

035572 

125252 


CmP 

*8B,8125252 

2730 

916396 

001401 




BEQ 

i *4 

2731 

916360 

104000 




HUT 


1732 

816362 

104400 




SCOPE 


2733 








2734 

916364 

022737 

125232 

033572 


Cmp 

8125252, ®#8 

2735 

816372 

001401 




BEQ 

,*4 

2736 

016374 

104000 




HUT 


2737 

916376 

104400 




SCOPE 


2738 

2739 

016400 

023737 

035572 

039572 


CMP 

MB, MB 

2740 

816406 

001401 




BEQ 

,44 

2741 

816410 

104000 




HUT 


2742 

916412 

104400 




SCOPE 


2743 








2744 








2745 





.SiTTU 

TEST 1 

move instructions 

2746 








27*7 

H6414 

013700 

035572 



MOV 

*8B,R0 

1748 

016420' 

022700 

125232 



CMP 

8125252, R0 

1749 

016424 

001401 




BEQ 

,M 

1790 

016426 

104030 




HUT 


1731 

016430 

104400 




SCOPE 


§752 








2733 

016432 

012737 

123252 

033624 


MQV 

8125252, MTEmP 

1734 

816440 

026767 

017126 

017196 


CMP 

@,TEMp 

2735 

016446 

001401 




BEQ 

■ *4 

1736 

014430 

104000 




HUT 


1737 

916432 

104400 




SCOPE 


2758 








1739 

016434 

013737 

033972 

033614 


MOV 


2760 

016462 

026747 

017104 

017114 


CMP 

B|C 

2761 

016470 

001401 




BEQ 

, +4 
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OZQGAC'i 

PU 

TEST MOVE INSTRUCTIONS 




2762 

**16472 

104000 




H L T‘ 


2763 

£16474 

104400 




SCOPE 


2764 








2765 





,S8TTl 

TEST 

Bic Instruction IndIi 

2766 








2767 

£16476 

012700 

177777 



MOV 

#*i,rb 

276 8 

116502 

£43700 

03557? 



BIC 

##B,R0 

2769 

£16506 

020027 

052525 



CMP 

R0 , #052525 

2770 

£16512 

001401 




BE® 

»*4 

2771 

£16514 

104000 




mlt 


2772 

£16516 

104400 




SCOPE 


2773 

2774 

£16520 

012767 

177777 

017076 


MOV 

#*1,TEmP 

2775 

£16526 

042737 

125252 

035624 


BIC 

#125252, P#TEMP 

2776 

£16534 

022767 

052525 

017062 


CMP 

#052525 , Te m P 

2777 

£16542 

001401 




BE® 

i*4 

2778 

£16544 

104000 




HLT 


2779 

£16546 

104400 




SCOPE 


2780 








2781 

£16550 

012767 

177777 

017036 


MOV 

#"1 1 C 

2782 

£165»6 

£43737 

035572 

035614 


BIC 

«#B,£#C 

2783 

£16564 

£26727 

017024 

052525 


CMP 

C, #52525 

2784 

£16572 

001401 




REQ 

, +4 

2785 

£16574 

104000 




hlt 


2786 

£16576 

104400 




SCOPE 


2787 








2788 





,S8TTt 

TEST 

subtract instruction 

2789 








2790 

£16600 

012700 

125252 



MQV 

#125252, R0 

279i 

£16604 

163700 

035572 



sgR 

«#B , R0 

2792 

£16610 

£20027 

000000 



CMP 

R0,#0 

2793 

£16614 

001401 




BE® 

, *4 

2794 

£16616 

104000 




HLT 


2795 

£16620 

104400 




SCOPE 


27 96 








2797 

£16622 

£127*7 

125252 

016774 


MOV 

#125252, TEMp 

2798 

£16630 

166737 

016736 

035624 


SUR 

B i 0# TEMP 

2799 

£16636 

£01401 




RED 

,*4 

28710 

£16640 

104000 




HLT 


2801 

£16642 

104400 




SCOPE 


2802 








2803 

£16644 

£12767 

125252 

016752 


MOV 

#125252, TEMP 

2804 

£16652 

163767 

035572 

016744 


SUB 

®#B,TEMP 

2805 

£16660 

£05767 

£16740 



TST 

TEMP 

2806 

£16664 

£01401 




BE® 

,+4 

2807 

£16666 

104000 




HLT 


2808 

£16670 

104400 




SCOPE 


2809 








28i0 





,SBTTl 

TEST ■ 

ado Indirect 

2811 








2812 

£16672 

005000 




Cl R 

R0 

2813 

£16674 

063700 

035572 



ADD 

®#B, R0 

2814 

£16700 

022700 

125252 



CMP 

#125252, R0 

2815 

£16704 

£01401 




BE® 

, * 4 
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DZQGAC'.Pll TEST ADD INDIRECT 


2816 

£16706 

10405^0 



HLT 


2817 

2818 

£16710 

104400 



SCOPE 


2819 

£16712 

*05067 

016706 


C^R 

temp 

2820 

£16716 

062737 

125252 

035624 

ADD 

#125252, *#TemP 

2821 

£16724 

022767 

125252 

016672 

CMP 

#125252, TEMP 

2822 

£16732 

001401 



BE® 

,+4 

2823 

£16734 

104000 



mlt 


2824 







2625 

£16736 

012767 

125252 

016660 

MOV 

#125252, TEMP 

2826 

£16744 

067737 

016640 

035624 

ADO 

M + 6,0#TEM p 

2827 

*16752 

*26727 

016646 

177777 

CMP 

temp,#*i 

2828 

£16760 

£01401 



BE® 

.♦4 

2829 

£16762 

104000 



HLT 


2630 

£16764 

104400 



SCOPE 


2831 







2832 





.SBTTl TEST UNARYS INDIRECT 

2833 







2834 

*1.6766 

012767 

177777 

016630 

MOV 

#*1»TEMP 

2935 

*16774 

005037 

035624 


CLP 

<*#TEMP 

2836 

*17000 

205767 

016620 


TST 

TEMP 

2837 

*17004 

001401 



BE® 

,*4 

2838 

*17006 

104000 



HLT 


2839 

2840 

£17010 

1044*0 



SCOPE. 


2841 

*17012 

£12767 

125252 

016604 

MOV 

#125252, TEMP 

2842 

*17020 

005137 

035624 


COM 

P#TEMP 

2843 

*17024 

022767 

052525 

016572 

CMP 

#052525 , temp 

2644 

£17032 

001401 



BE® 

, *4 

2845 

*17034 

104000 



HLT 


2846 

*17036 

104400 



SCOPE 


2847 

2848 

*17040 

005067 

016560 


ClR 

TEMP 

2849 

£17044 

005237 

035624 


INC 

®#TEMP 

2850 

£17050 

022767 

000001 

016546 

CMP 

#1 , TEMP 

2851 

£17056 

001401 



BE® 


2852 

*17060 

104000 



mlt 


2853 

*17062 

104400 



SCOPE 


2854 







2855 

£17064 

005067 

016534 


c l r 

TEMP 

2856 

*17070 

005377 

016532 


DEC 

*TEMP+2 

2857 

£17074 

026727 

016524 

177777 

CMP 

TEMP ( #»1 

2958 

*17102 

001401. 



BE® 

, + 4 

2859 

*17104 

104000 



mlt 


2860 

*17106 

104400 



SCOPE 


2861 







2862 

£17110 

£12767 

000001 

016506 

HQV 

#1,TEmP 

2863 

£17116 

005437 

035624 


NEG 

@>#TEMP 

2664 

£17122 

022767 

177777 

016474 

CMP 

#*1, temp 

2865 

*17130 

001401 



BEQ 

.+4 

2866 

£17132 

104000 



mlt 


2867 

2868 

*17134 

104400 



SCOPE 



2869 ,SBTTl TEST COMPARE INSTRUCTION INDEXED AND INDIRECT 
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DZ8GAC i 

Ptl 

TEST COMPARE INSTRUCTION INDEXED AND 

indirect 

2870 







2871 

5117136 

027727 

016432 

125252 

CMP 

#042, #12*252 

2872 

5117144 

001401 



BEQ 

.+6 

2873 

Bi7j,46 

104000 



MLT 


2874 

ioie 

017150 

104400 



SCOPE 


2 o 7 5 

2876 

017152 

022777 

125252 

016414 

CMP 

#125252, »B*2 

2877 

517160 

001 401 



BEQ 

,44 

2878 

017162 

104000 



HIT 


2879 

517164 

104400 



SCOPE 


2880 







2881 

517166 

027777 

016402 

016400 

CMP 

BB*2| 9B*2 

2882 

117174 

001401 



BEQ 

,♦4 

2883 

517176 

104000 



MET 


2884 

517200 

104400 



SCOPE 


2885 







2886 




.sbtt l 

TEST I 

move instructions indexed and indirect 

2887 







2888 

517202 

017700 

016366 


MOV 

BB*2i R0 

2889 

517206 

022700 

125252 


CMP 

#125252, R0 

2890 

517212 

001401 



BEQ 

,*« 

2891 

517214 

104000 



MET 


2892 

517216 

104400 



SCOPE 


2893 







2894 

517220 

512777 

125252 

016400 

MOV 

#125252, RTEmp+2 

2895 

517226 

026767 

016340 

016370 

CMP 

BiTEMP 

2896 

517234 

001401 



BEQ 

,*4 

2897 

517236 

104000 



HUT 


2898 

517240 

104400 



SCOPE 


2899 







2900 

517242 

017777 

016326 

016346 

MOV 

PB+2, PC+2 

2901 

517250 

026767 

016316 

016336 

CMP 

B,C 

2902 

517256 

001401 



BEQ 

,★4 

2903 

517260 

104000 



MLT 


2904 

517262 

104400 



SCOPE 


2905 







2906 




, SBTTL 

TEST 1 

bic Instruction indexed and indirect 

2907 







2908 

517264 

012700 

177777 


MOV 

#«1iR0 

2909 

517270 

047700 

016300 


BIC 

RB*2,R0 

2910 

517274 

020027 

052525 


CMP 

R0,#52525 

2911 

517300 

001401 



BEQ 

,44 

2912 

517302 

104000 



HUT 


2913 

517304 

104400 



SCOPE 


2914 







2915 

517306 

012767 

17777/ 

016310 

MOV 

#**1 , TEMP 

2916 

517314 

042777 

125252 

016304 

BIC 

#125252, PTEMP4§ 

29£7 

517322 

022767 

052525 

016274 

CMP 

#52525, TEMP 

2918 

517330 

001401 



BEQ 

,44 

2919 

517332 

104000 



HUT 


2920 

817334 

104400 



SCOPE 


2921 







1922 

817336 

012767 

177777 

016250 

MOV 

#*i»C 

2923 

017344 

047777 

016224 

016244 

BIC 

PB*2, 8»C*2 
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2924 

*17352 

026767 

016234 

016234 

8925 

117360 

001401 



8926 

*17362 

104000 



8927 

*17364 

104400 



8928 





8929 

*17366 

012700 

125252 


8930 

*17372 

167700 

016176 


8931 

*17376 

020027 

000000 


8932 

*17402 

001401 



2933 

*17404 

104000 



2934 

*17406 

104400 



2935 





2936 

*17410 

012767 

125252 

016206 

2937 

*17416 

166777 

016150 

016202 

2938 

*17424 

001401 



*959 

*17426 

104000 



8940 

*17430 

104400 



1941 





8942 

*17432 

012767 

125252 

016164 

8943 

*17440 

16*777 

016130 

016160 

2944 

*17446 

005767 

016152 


2945 

*17452 

001401 



8946 

117454 

104000 



8947 

*17456 

104400 



2948 





2949 





8950 





2951 

*17460 

005000 



2952 

*17462 

067700 

016106 


8953 

*17466 

022700 

125252 


8954 

*17472 

001401 



8955 

*17474 

104000 



2956 

*17476 

104400 



2957 





8958 

*17500 

005067 

016120 


1959 

*17504 

062777 

125252 

014114 

I960 

*17512 

022767 

125292 

016104 

2961 

*17520 

001401 



2962 

*17522 

104000 



2963 





2964 

H7524 

012767 

125252 

016072 

2965 

*17532 

067777 

016052 

016066 

*966 

*17540 

026727 

016060 

177777 

2967 

*17546 

001401 



2968 

*17550 

104000 



8969 

*17552 

104400 



2970 





8971 





8972 





2973 

*17554 

012767 

177777 

016042 

8974 

*17562 

005077 

016040 


2975 

*17566 

005767 

016032 


2976 

*17572 

001401 



8977 

*17574 

104000 




CMP 

A*10,C 

BEQ 

HUT 

SCOPE 

,44 

MOV 

#125252, R0 

SUB 

*862, R0 

CMP 

R0, #0 

BEQ 

HUT 

SCOPE 

,64 

MOV 

#125252, TEMR 

SUB 

B,*TEMP62 

BEQ 

HUT 

SCOPE 

,64 

MOV 

#125258, TEMR 

SUB 

•B*2,#TEMP*2 

TST 

TEMP 

BEQ 

HUT 

SCOPE- 

.64 


.SSTTL TEST ADD INDIRECT WITH INDEXING 


CUR 

R0 

ADD 

#B*2,R0 

CMP 

#125252, R0 

BEQ 

HUT 

SCOPE 

,44 

CUR 

T^MP 

ADO 

#125252, PTEMP+8 

CMP 

#125252, TEMP 

BEQ 

HUT 

,44 

MOV 

#125252, TEMP 

ADO 

•A*6,#TEMP*2 

CMP 

TEMP , #*»1 

BEQ 

HUT 

SCOPE 

,64 


.sBttl test unarys InOIrect wits Indexing 

MOV #*1,TEMP 

CL.R PTEMP*2 

TST TEMP 

BED ,*4 

HUT 
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*978 

*17576 

104400 



*979 





*980 

*176*0 

*12767 

125252 

016016 

*981 

*17606 

*05177 

016014 


*982 

*17612 

022767 

052525 

016004 

*983 

*176*0 

001401 



*984 

*17622 

104000 



*985 

*986 

*987 

*17624 

104400 



*17626 

O05067 

*15772 


*988 

*17632 

005277 

*15770 


*989 

*17636 

022767 

000001 

015760 

*990 

*17644 

001401 



*99l 

*17646 

104000 



*99 2 

*17650 

104400 



*993 





*994 

*17652 

005067 

015746 


*995 

*17656 

005377 

015744 


8996 

*176*2 

026727 

015736 

177777 

*997 

*17670 

001401 



*998 

*17672 

304000 



*999 

*17674 

104400 



3000 





3001 

*17676 

*12767 

000001 

015720 

3002 

*17704 

005477 

015716 


9003 

*17710 

02276 7 

177777 

015706 

3004 

*17716 

001401 



3005 

*17720 

104000 



8006 

*17722 

104400 



8007 





3008 

*17724 

012767 

3 77777 

015672 

3009 

*17732 

000261 



3010 

*17734 

5105577 

015666 


3011 

*17740 

005767 

015660 


3012 

*17744 

001401 



3013 

*17746 

104000 



3014 

*17750 

104400 



3015 





3016 

*17752 

012767 

000001 

015644 

3217 

*17760 

*00261 



3018 

*17762 

005677 

015640 


3019 

*17766 

005767 

015632 


3020 

*17772 

001401 



3021 

*17774 

104000 



3022 

*17776 

104400 



3023 

3024 





3025 





3026 

*20000 

012700 

177772 


3027 

*20004 

027027 

035602 

125252 

3028 

*20012 

001401 



3029 

*20014 

104000 



3030 

*20016 

104400 



3031 






scope 

MOV #125252#TEMp 

COM »TEMP*2 

CMP #05252S,TEMp 

RED ,*4 

HLT 

SCOPE 

CLP TEmp 

INC ATEMP+2 

CMP #1 i TEMP 

BED , *4 

WLT 
SCOPE 

CLP TEmp 

DEC ®TEMP+2 

CMP TEMP,#-1 

BED , + 4 

h L T 

SCOPE 

MOV #1,TF.'mP 

NEC *TEMP+2 

CMP #-l,TEMp 

BEO , +4 

MLT 
SCOPE 

MQV #-l,TEMP 

SEC 

ADC «TEMP*2 

TST TEMP 

RED ,4-4 

MLT 
SCOPE 

MOV *1,TEmP 

SEC 

SBC ®TEMP+2 

TST TEMP 

BED ,+4 

MLT 

SCOPE 

.SBTTL TEST OP COMBINED INDEX! Nr AN^ INDIRECT 

MOV # • 6, R0 

Cmp 5»A C Rf* ) , # 1 2^2*52 

REO , + 4 

MLT 

SCOPE 
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Q20GAC',PU TEST OF COMBINED INDEXING AND INDIRECT 


3032 

*20000 

*127*0 

177772 



MOV 

#-6,R0 

8033 

*20004 

022770 

125252 

*356*2 


CMP 

#125252 » w A f R" ) 

3034 

*20032 

*014*1 




RED 

, + 4 

3035 

*2*034 

1040*0 




MLT 


3036 

*2*036 

1044*0 




SCOPE 


3037 








3038 

*2*0*0 

0127*0 

177772 



MOV 

#*6,R0 

8039 

*2*044 

*127*1 

*000*2 



MOV 

#+2*Rl 

3040 

*2*050 

*27071 

035602 

*356*2 


CMP 

»A(R0) ,*A(R1 j 

3041 

*2*056 

*014*1 




BEG 

,♦4 

3042 

*2*0 6 0 

1040*0 




MLT 


3043 

*2*062 

1044*0 




SCOPE 


3044 








3045 





.SBTTL 

TEST ! 

SIC INSTRUCTION indexed A*’D INDIRECT 

3046 








3047 

*2*064 

0127*0 

*00006 



MOV 

#+6,P0 

3048 

*2*070 

*12767 

177777 

015526 


M 0V 

#n,TEMp 

3049 

*2*076 

047067 

*356*2 

*15520 


R I C 

®A(R0) # TEMP 

3050 

*2*1*4 

022767 

125252 

*15512 


CMP 

#125252, TEMP 

3051 

*2*112 

*014*1 




RED 

i +4 

3052 

*2*114 

1040*0 




MLT 


3053 

*2*116 

1044*0 




SCOPE 


3054 








3055 

*2*100 

312700 

177772 



mov 

#*•6 , R0 

3056 

*2*104 

012767 

177777 

*15462 


MQV 

#*1,C 

3057 

*2*132 

*42770 

125252 

*35624 


PIC 

#125252,«TEMP(P0) 

3058 

*2*140 

326727 

015450 

*52525 


CMP 

C, #052525 

3059 

*2*146 

0014*1 




REO 

, +4 

3060 

*2*150 

1040*0 




MLT 


3061 

*2*152 

1044*0 




SCOPE 


3062 

*2*154 

*12767 

17777 7 

015432 


MOV 

#*1#C 

3063 

*2*162 

*127*0 

177772 



MQV 

#*6, R0 

3064 

*2*166 

*127*1 

177772 



MOV 

#w6« Rl 

3065 

*2*172 

347071 

035602 

035624 


BIC 

•A<RB),dTEHpfRl) 

3066 

*2*2*0 

022767 

*52525 

0154*6 


CMP 

#052525 , C 

8067 

*2*2*6 

3014*1 




REQ 

,+4 

3068 

*2*210 

1040*0 




MLT 


3069 

*2*212 

1044*0 




SCOPE 


3070 








3071 





.SBTTl 

TEST 

compare t byte > Instruction Indexed 

3072 








3073 

*2*214 

0127*0 

177770 



MOV 

# 1 0 , R 0 

3074 

*2*220 

126027 

*35602 

000252 


c m pb 

A<R0>, #000252 

3075 

*2*206 

0014*1 




RE* 

, +4 

3076 

*2*230 

1040*0 




MLT 


3077 

*2*232 

1044*0 




SCOPE 


3078 








3079 

*2*234 

*127*0 

177770 



MOV 

#*10, R0 

3080 

*2*240 

122760 

000252 

*356*2 


CmpB 

#000252# A ( R0 ) 

3081 

*2*246 

*014*1 




BED 

• *4 

3082 

*2*250 

1040*0 




MLT 


3083 

*2*252 

104400 




SCOPE 


3084 








3085 

*2*254 

*127*0 

000010 



MOV 

#10, R0 




GENERaE 

TEST program 

MACYir, 

624 24.QCU73 

20120 

PAGE 6? 

ohqgac', 

PU 

TEST COMPARE (BYTE) INSTRUCTION 

IN0EXEO 

3246 

>20260 

126027 

335602 

000125 

cmps 

A(R0>,#0<*0125 

3287 

>20266 

001401 



BEQ 

» + 4 

3238 

>20270 

104030 



MLT 


3289 

>20272 

104400 



SCOPE 


3090 







3091 

>20274 

012700 

000010 


MOV 

#10, R0 

3092 

>20300 

122760 

000125 

335602 

c m pb 

#000125, A(R0> 

3093 

>20306 

P01401 



SEO 

, +4 

3094 

>20310 

104000 



WLT 


3095 

>20312 

104400 



SCOPE 


3096 







3097 

>20314 

>12700 

177770 


MOV 

#*10,R0 

3098 

>20320 

126060 

035602 

035632 

CmpB 

A(R0) , A<R0) 

3099 

>20326 

001401 



BES 

, +4 

3100 

>20330 

104000 



WLT 


3101 

>20332 

104400 



scope 


3102 







3103 

>20334 

012700 

000010 


MOV 

#♦10 , R0 

3134 

>20340 

126060 

035602 

035602 

c m pb 

MR0J,A(R0> 

3105 

>20346 

001401 



BEO 

.♦4 

3106 

>20350 

104000 



RLT 


3107 

>20352 

104400 



SCOPE 


3108 







3109 

>20354 

>12700 

177770 


MOV 

#*10 , R0 

3ii0 

>20360 

>12701 

000004 


mqV 

#+4,Pl 

3111 

>20364 

126061 

035602 

035602 

cmpb 

MR0)|A(R1> 

3112 

>20372 

001401 



BEQ 

,*4 

3113 

>20374 

104000 



MLT 


3114 

>20376 

104400 



SCOPE 


3115 







3116 

>20400 

126160 

335602 

035602 

cmpb 

A ( R1 5 , A ( R0 ) 

3117 

>20406 

001401 



BEO 

,♦4 

3118 

>20410 

104000 



MLT 


3119 

>20412 

104400 



SCOPE 


3120 







3121 

>20414 

012700 

177774 


MOV 

#«4 , P0 

3122 

>20420 

012701 

300010 


MOV 

#+10, Rl 

3123 

>20424 

126061 

035602 

035632 

cmpb 

A ( R0 ) , A ( R1 ) 

3124 

*20432 

001401 



REO 

,+4 

3125 

>20434 

104000 



WLT 


3126 







3127 

>20436 

012700 

177774 


MOV 

#*4, P0 

3128 

>20442 

012701 

000010 


MOV 

#10,R1 

3129 

>20446 

126160 

035602 

035602 

cmpb 

A(R1),A(R0) 

3130 

>20454 

001431 



BEO 

, +4 

3131 

>20456 

104000 



MLT 


3132 

>20460 

104400 



SCOPE 


3133 







3134 




,sbttl 

TEST 1 

4 0 V El (BYTE) INSTRUC 

3135 







3136 

>20462 

012730 

177770 


MOV 

#«10,R0 

3137 

>20466 

116067 

035602 

015130 

mqVB 

A ( R0 ) , TEMp 

3138 

>20474 

126727 

015124 

000252 

cmpb 

TEMP, #000252 

3139 

>20502 

001431 



BEQ 

, *4 


GENERAL: Test PROGRAM MACYU',624 ?4«0CT„73 20 1 20 PAGE 63 

OZQGAC'.Pll TEST MOVE (BYTE) INSTRUCTION POR INDEX 


3140 

>20504 

104000 



m l t 


3141 

>20506 

104400 



SCOPE 


3142 







3143 

>20510 

012700 

000010 


MOV 

#♦10, R0 

3144 

>20514 

116067 

035602 

015102 

MQVB 

A ( R0 ) , TEMp 

3145 

>20522 

126727 

015076 

000125 

CMPB 

TEMP, #000125 

3146 

>20530 

001401 



B€t3 

1 +4 

3147 

>20532 

104000 



MLT 


3148 

>20534 

104400 



SCOPE 


3149 







3150 

>20536 

012700 

177770 


MQV 

#*10, R0 

3151 

>20542 

112760 

125252 

035624 

MQVB 

#125252, TEMPjRpi) 

3152 

>20550 

126727 

015040 

125252 

CMPB 

C, #125252 

3153 

>20556 

001401 



BEQ 

,♦4 

3154 

>20560 

104000 



MLT 


3155 

>20562 

104400 



SCOPE 


3156 







3157 

>20564 

012700 

000010 


MOV 

#+10, R0 

3158 

>20570 

112760 

052525 

035624 

MOVB 

#052525, TEMP(R0) 

3159 

>20576 

126727 

015032 

052525 

cmpb 

TEMp+10, #052525 

3160 

>20604 

001401 



BEQ 

, +4 

3161 

>20606 

104000 



mlt 


3162 

>20610 

104400 



SCOPE 


3163 







3164 





.SBTTl test 

bic (BYTE) Instruct ton r QR 

3165 







3166 

>20612 

012767 

177777 

015004 

MOV 

#el, TEMP 

3167 

>20620 

012700 

177770 


MOV 

#*10, R0 

3168 

>20624 

146067 

035602 

014772 

3 1 C8 

A ( R 0 ) , T £ M p 

3169 

>20632 

126727 

014766 

177525 

CMPB 

TEMP, #177525 

3170 

>20640 

001401 



BEO 

, 4-4 

3171 

>20642 

104000 



mlt 


3172 

>20644 

104400 



SCOPE 


8173 







3174 

>20646 

012767 

177777 

014750 

MQV 

#*1 , TEMp 

3175 

>20654 

012700 

000010 


MOV 

#10 , R0 

3176 

>20660 

146067 

035602 

014736 

B I CB 

A ( R0 ) , TEMp 

3177 

>20666 

126727 

014732 

007652 

CMPB 

TEMP, #007652 

3178 

>20674 

001401 



BEQ 

,♦4 

3179 

>20676 

104000 



hlt 


3180 

>20700 

104400 



SCOPE 


8181 







3162 

>20702 

012767 

177777 

014724 

MOV 

#*1iTEMP+10 

3183 

>20710 

012700 

000010 


MOV 

#10, R0 

8184 

>20714 

142760 

125252 

035624 

B I CB 

#125252, T£M p { R>) 

3165 

>20722 

126727 

014706 

002525 

CMPB 

TEMP+10, #2523 

3186 

>20730 

001401 



BEQ 

,+4 

3187 

>20732 

104000 



HLT 


8188 

>20734 

104400 



SCOPE 


8189 







3190 

>20736 

012700 

177770 


MOV 

#*10,R0 

8191 

>20742 

012767 

177777 

014644 

MOV 

#*1,TEMP*10 

3192 

>20750 

142767 

052525 

014636 

3 1 C8 

#052525, TEMPwip! 

3193 

>20756 

126727 

014632 

125252 

CMPB 

TEMP-10,#125?52 



GENERAL; TEST PROGRAM MACYli',624 ?4»»0CT;73 20120 p A G E 64 

0i9GAC f ,Pil TEST BIG (BYTE) INSTRUCT I ON FOR INDEXING 


3194 

$20764 

001401 



BED 


3195 

$20766 

104000 



MET 


3196 

$20770 

104400 



SCOPE 


3197 

3196 





, SSTTU TEST UNARYS (BYTE) tvDEXED 

3199 







3200 

$20772 

012767 

177777 

014624 

MQV 

#*1,TEMP 

3201 

$21000 

012700 

177770 


MQV 


3202 

$21004 

103060 

033634 


CLRS 

D(R0) 

3203 

$21010 

105767 

014610 


TSTB 

TEMP 

9204 

$21014 

001401 



BED 

,♦4 

9205 

$21016 

104000 



HLT 


3206 

$21020 

104400 



SCOPE 


3207 

8208 

$21022 

012767 

177777 

014574 

MOV 

#*1iTEmP 

9209 

$21030 

012700 

177770 


MOV 

#*101 Rp 

3210 

$21034 

105060 

03*634 


CURB 

D(R0 ) 

3211 

$21040 

026727 

014560 

177400 

CMP 

TEMP, #177400 

8212 

$210$6 

001401 



BED 

, *4 

3213 

$210*0 

104000 



M,LT 


8214 

$210*2 

104400 



SCOPE 


3215 







3216 

$210*4 

012767 

177777 

014542 

MOV 

#*1 » TEMP 

8217 

$21062 

012700 

177771 


MOV 

# w 7 , R 0 

3216 

$21066 

103060 

03*634 


CURB 

P(R0) 

8219 

$21072 

026727 

014526 

000377 

CMP 

temp , #000377 

8220 

$21100 

001401 



BED 

.♦4 

8221 

$21102 

104000 



WUT 


9222 

$21104 

104400 



SCOPE 


8223 

3224 

$21106 

012767 

177777 

014510 

MOV 

#*1 , TEMP 

3225 

$21114 

012700 

000010 


MQV 

#+10 , R0 

3226 

$21120 

105060 

035614 


CLRB 

C(R0) 

8227 

$21124 

105767 

014474 


TST3 

temp 

3228 

$21130 

001401 



BEQ 

1 +4 

3229 

$21132 

104000 



HUT 


3230 

$21134 

104400 



SCOPE 


3231 







8232 

$21136 

$12767 

177777 

$14460 

MQV 

#«1, TEMP 

3233 

$21144 

$12700 

177770 


MQV 

#*10,R0 

3234 

$211*0 

105160 

03*634 


COMB 

0 ( R0 ) 

8235 

$2U*4 

105767 

014444 


TSTB 

TEMP 

9236 

$21160 

001401 



BED 

,*4 

8237 

$21162 

104000 



MUT 


3238 

*21164 

104400 



SCOPE 


8239 







3240 

$21166 

012767 

177777 

014430 

MOV 

#*1*TEMP 

8241 

$21174 

012700 

000010 


MQV 

#10, R0 

3242 

$21200 

105160 

035614 


COMB 

G(R0> 

3243 

$21204 

105767 

014414 


TSTB 

TEMp 

3244 

$21210 

001401 



BED 

,+4 

3245 

$21212 

104000 



HUT 


8246 

$21214 

104400 



SCOPE 


3247 

$21216 

012767 

177777 

014400 

MOV 

#®1 1 TEMP 


GENERaU 

TEST PROGRAM 

MACYU',624 24bOCT;73 

20(20 

PAGE 65 

dzqgac'.pi 1 

TEST UNARYS (BYTE) INDEXED 



3248 

$21224 

0112700 

177770 


MQV 

#»10,R0 

3249 

$21230 

105260 

035634 


INCB 

O(R0) 

3250 

$21234 

105767 

014364 


TSTB 

TEMP 

3251 

$21240 

001401 



BED 

, + 4 

3252 

$21242 

104000 



HUT 


3233 

$21244 

$26727 

014354 

177400 

CMP 

TEMP , #177 400 

3254 

$ 212*2 

001401 



BEQ 

»*4 

3235 

$212*4 

104000 



HUT 


8236 

$ 212*6 

104 4 00 



SCOPE 


1257 







3258 

$ 212*0 

012767 

177777 

014336 

MOV 

#«1 , TEMP 

3259 

$ 212*6 

012700 

000010 


MOV 

# + 1 0 , R 0 

3260 

$21272 

105260 

035614 


INCB 

C(R 0 > 

3261 

$21276 

105767 

014322 


TSTB 

TEMP 

8262 

$21302 

$01401 



BED 

,+4 

3263 

$213$4 

104000 



HUT 


3264 

3265 

$21306 

1044^0 



SCOPE 


3266 

$21310 

$12767 

000001 

014306 

MOV 

#1,TEMP 

3267 

$21316 

$12700 

177770 


MQV 

#* 10 , R 0 

3268 

$21322 

105360 

035634 


OECB 

D(R0> 

8269 

$21326 

105767 

014272 


TSTB 

TEMP 

3270 

$21332 

001401 



BED 

.*4 

3271 

$21334 

104000 



mlt 


8272 

$21336 

104400 



SCOPE 


3273 







3274 

$21340 

012767 

000001 

014256 

MOV 

#1.TEmP 

3275 

$21346 

$12700 

000010 


MOV 

# 10 , R 0 

3276 

$213*2 

105360 

035614 


DECS 

C(R 0 > 

3277 

$213*6 

105767 

014242 


TSTB 

TEMP 

3278 

$21362 

001401 



BE3 

• +4 

8279 

$213*4 

104000 



HUT 


3280 

3251 

3232 

$213*6 

104400 



SCOPE 


$21370 

012767 

000001 

014226 

MOV 

#1,TEmP 

3283 

$21376 

012700 

1.77770 


MQV 

#»10,R0 

3284 

$21402 

105460 

03*634 


NEGB 

OIR 0 ) 

3285 

$21406 

026727 

014212 

000377 

CMP 

TEMP, #377 

3286 

$21414 

001401 



BEQ 

, +4 

3287 

$21416 

104000 



HUT 


3288 

3289 

$21420 

104400 



SCOPE 


3290 

$21422 

312767 

000001 

014174 

MOV 

#i,temp 

3291 

$21430 

012700 

000010 


MOV 

# + 1 0 1 R 0 

3292 

$21434 

105460 

035614 


NEGB 

C(R 0 ) 

3293 

$21440 

026727 

0141*0 

000377 

CMP 

TEMP, #377 

3294 

$21446 

001401 



BED 

, + 4 

3295 

$214*0 

1040O0 



HUT 


3296 

3297 

$214*2 

104400 



SCOPE 


3298 

$214*4 

012767 

177777 

014142 

MOV 

#n.TEMp 

3299 

$21462 

012700 

177770 


MOV 

#* 10 , R 0 

3300 

$21466 

000261 



SEC 


33S1 

$21470 

105560 

035634 


A DCS 

D(R0) 



p AGE. 66 


GENERAL TEST PROGRAM M ACYU r ,6?4 ?4-0CT,73 2*120 


D*8GAC',PU 

TEST UNARYS (BYTE) INDEXED 



3302 

9*21474 

926727 

014124 

177400 

CMP 

TEMP, #177400 

5303 

921502 

901401 



BEQ 

, +4 

3304 

921504 

104000 



MLT 


3305 

921506 

104400 



SCOPE 


8306 

3307 

921510 

012767 

177777 

014196 

MOV 

#•1 , TEMP 

3308 

921516 

O12700 

000010 


MOV 

#+10, R0 

3309 

921522 

00O261 



SEC 


3310 

921524 

105560 

035614 


ADCB 

C(R0) 

3311 

921530 

026727 

O14070 

177400 

CMP 

TEMP ,#177400 

3312 

921536 

001401 



BEQ 

, +4 

3313 

921540 

104000 



MLT 


3314 

921542 

104400 



SCOPE 


3315 







3316 

*21544 

012767 

000401 

014052 

MQV 

#401,TEmP 

3317 

9215^2 

012700 

177771 


MOV 

#*7,R0 

3318 

921556 

000261 



SEC 


3319 

921560 

105660 

035634 


SBCB 

D(R0) 

3320 

*21564 

022767 

000001 

014032 

CMP 

#1, TEMP 

3321 

*21572 

001401 



BEQ 

1+4 

3322 

921574 

104000 



HLT 


3323 

921576 

104400 



SCOPE 


3324 







3325 

921600 

012767 

000001 

014016 

MOV 

#1.TEmP 

3326 

921606 

012790 

000010 


MOV 

#+10, R0 

3327 

921612 

900261 



SEC 


3328 

921614 

105660 

035614 


SBCB 

C(R0) 

3329 

921620 

905767 

014000 


TST 

TEMP 

3330 

921624 

001401 



BEQ 

, + 4 

3331 

921626 

1040O0 



MET 


3332 

921630 

104400 



SCOPE 


3333 







3334 




.sbttl 

TEST COMPARE (BYTE) jNSTPUCTjOM INDIRECT 

3335 







3336 

921632 

123727 

035572 

000252 

CmpB 

0#B, #000252 

3337 

921640 

001401 



BEQ 

, + 4 

3338 

921642 

104000 



MLT 


3339 

921644 

1044O0 



SCOPE 


3340 







3341 

921646 

123727 

035573 

000252 

cmpb 

B#B+1,#252 

3342 

921654 

001401 



BEQ 

.+4 

3343 

*21656 

104000 



HLT 


3344 

921660 

104400 



SCOPE 


3345 







3346 







3347 

921662 

122737 

125252 

035572 

cmpb 

#125252, P#B 

3348 

*21670 

001401 



BEQ 

,+4 

3349 

921672 

104000 



MLT 


3350 

921674 

104400 



SCOPE 


3351 







3352 

021676 

123737 

035572 

035572 

cmpb 


3353 

921704 

9 0 i 4 0 1 



beq 

,♦4 

3354 

921706 

104000 



MLT 


8355 

921710 

104400 



SCOPE 



GENERAL' T£ST PROGRAM 

dzggac'.pu 

3356 

3357 

3358 


u«AM MACYU'624 24«CCT;73 2OI20 PAGE 67 

TEST COMPARE {BYTE ) INSTRUCTION INDIRECT 


.SBTTL TEST MOVE (BYTE) INSTRUCTION INDIRECT 


8359 

921712 

113700 

035572 


MQVB 

P#B, R0 

3360 

921716 

122700 

000252 


CMPB 

#000252, R0 

3361 

921722 

001401 



BEQ 

.♦« 

3362 

921724 

104000 



MLT 


3363 

921726 

104400 



SCOPE 


3364 







8365 

921730 

112737 

125252 

035624 

MQVB 

#125252, 0#TEh 

8366 

921736 

126767 

013630 

013660 

CMPB 

BiTEMp 

8367 

921744 

001401 



BEQ 

,+4 

3368 

921746 

1040$0 



MLT 


3369 

921750 

104400 



SCOPE 


3370 







8371 

921752 

113737 

035572 

035614 

MQ VB 

»#B,0#C 

3372 

921760 

126767 

013606 

013626 

CMPB 

B,C 

3373 

921766 

001401 



BEQ 

,+4 

3374 

921770 

104030 



MLT 


8375 

921772 

104400 



SCOPE 


3376 







3377 





.SBTTl TEST UNARY (BYTE) I NS 

3378 







3379 

921774 

012767 

177777 

013622 

MOV - 

#si,temp 

3330 

922002 

105037 

035624 


CLRB 

9#TEMp 

3381 

922006 

026727 

013612 

177400 

CMP 

TEMP, #177400 

8382 

922014 

001401 



BEQ 

, + 4 

3383 

922016 

104030 



MLT 


3384 

922020 

104400 



SCOPE 


3385 







3386 

922022 

012767 

125252 

013574 

MOV 

#125252 , TEMP 

8387 

922030 

105137 

035624 


COMB 

&#TEMp 

3388 

922034 

022767 

125125 

013562 

CMP 

#125125, TEMP 

3389 

922042 

001401 



BEQ 

, +4 

3390 

922044 

104000 



MLT 


8391 

922046 

104400 



SCOPE 


8392 

1393 

022050 

012767 

125252 

013546 

MOV 

#125252, TEMP 

3394 

922056 

105137 

035625 


COMB 

3#TEMP+1 

3395 

922062 

022767 

052652 

013534 

CMP 

#052652, TEMP 

3396 

922070 

001401 



BEQ 

, + 4 

8397 

022072 

104000 



HLT 


3396 

022074 

104400 



SCOPE 


3399 







8400 

022076 

005067 

013522 


CLR 

TEMP 

3401 

922102 

105237 

035625 


I NCB 

P#TEMP*1 

8402 

022106 

022767 

000400 

013510 

CMP 

#400, TEMP 

8403 

922114 

001401 



BEQ 

.♦4 

8404 

022116 

104000 



HLT 


8405 

022120 

104400 



SCOPE 


3406 







8407 

922122 

005067 

013476 


c l r 

temp 

8408 

022126 

105377 

013474 


DEC3 

9TEMP+2 

8409 

922132 

026727 

013466 

000377 

CMP 

TEMP, #377 
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34*0 

02*140 

00*401 




BEQ 

,♦4 

34ii 

l»22*«2 

104000 




HUT 


34*2 

*>22*44 

104400 




SCOPE 


34*3 








34*4 

522*46 

005067 

013452 



CUR 

TEMP 

34*5 

1*22*52 

1*2767 

000001 

013445 


mqvb 

#liTEMP+l 

34*6 

822*50 

105437 

035625 



NEGB 

PRTEMPU 

34*7 

822*64 

022767 

177400 

013432 


CMP 

#177400, TEMp 

34*8 

822*72 

00*40* 




BEO 

, *4 

84*9 

822*74 

*04000 




HUT 


8430 

A 4*4 

822*76 

104400 




SCOPE 


5 “ c 1 

3422 

3423 





,S8TTL 

TEST l 

COMPARE (BYTE) INSTRUCTION INDEXED AND INDIRECT 

3424 

522200 

127727 

013370 

125252 


cmpb 

PB*2,#125252 

3425 

822206 

00*40* 




BEQ 

,*4 

8426 

822210 

104000 




HUT 


3427 

822212 

104400 




SCOPE 


8428 

3429 

022214 

122777 

125252 

013352 


cmpb 

#125252,88*2 

3430 

022222 

00140* 




BEQ 

,♦4 

843* 

822224 

104000 




HUT 


8432 

822226 

104400 




SCOPE 


8433 








8434 

822230 

127777 

013340 

013336 


cmpb 

§8*2,98+2 

8435 

822236 

001401 




beq 

,♦4 

3436 

822240 

104000 




HUT 


8437 

022242 

104400 




SCOPE 


8438 








8439 





•sbttu 

TEST I 

move; (byte) instruction Indexed and Indirect 

3440 








8441 

822244 

117700 

0*3324 



mqvb 

§8+2, R0 

8442 

022250 

122700 

125252 



CMPB 

#125252, R0 

3443 

022254 

00*401 




BEQ 


3444 

822256 

104000 




HUT 


8445 

822260 

104400 




SCOPE 


8446 








8447 

822242 

112777 

125252 

013336 


movb 

#125252, RTEMPTf 

8448 

022270 

126767 

013276 

013326 


CMPB 

B» TEMP 

8449 

022276 

001401 




BEQ 

« + 4 

8450 

022300 

104000 




HUT 


8451 

822302 

104400 




SCOPE 


8452 

3453 

822304 

117777 

013264 

013304 


MQVB 

•B+2,'C*2 

3454 

822312 

126767 

0*3254 

013274 


CMPB 

3 1 C 

3455 

022320 

00*401 




BEQ 

,♦4 

8456 

822322 

104000 




HUT 


8457 

822324 

104400 




SCOPE 


8458 








8459 





’.sSttl 

TEST BIC (BYTE) INSTRUCTION INJECT WITH INDEXING 

8460 








8461 

822326 

012700 

177777 



MQV 

#n,R0 

3462 

822332 

147700 

013236 



BICB 

08*2, R0 

8463 

022336 

120027 

052525 



CMPB 

R0, #52525 
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02BGAC', 

Pil 

TEST BIC (BYTE) 

INSTRUCTION INDIRECT 1 

WITH INDEXING 

§464 

322342 

00*401 




BEQ 

,♦4 

3465 

9223*4 

104000 




HUT 


3466 

02?346 

104400 




SCOPE 


3467 








3468 

1*22350 

012767 

177777 

013246 


MOV 

#«1,TENP 

3469 

922356 

142777 

125252 

013242 


BICB 

#125252, 9TEMP+2 

3470 

9223*4 

122767 

052525 

013232 


CMPB 

#52525, TEMP 

3471 

722372 

00*401 




BEQ 

, +4 

3472 

922374 

104000 




HUT 


3473 

922376 

104400 




SCOPE 


8474 








3475 

922400 

012767 

177777 

0*3206 


MOV 

#*i,C 

3476 

922406 

147777 

013162 

013202 


BICB 

PB+2,PC+2 

3477 

922414 

126767 

013*72 

013172 


CMPB 

A+10 , C 

3478 

922422 

00*401 




BEQ 

,*4 

3479 

922424 

104000 




HUT 


8480 

022426 

104400 




SCOPE 


3481 








3482 

*4a-r 





•SBTTl 

TEST 1 

jnarys (byte) indirect with indexing 

3484 

922430 

012767 

177777 

013*66 


MQV 

#«1 , TEMp 

3485 

922436 

105077 

013164 



CLRB 

0TEMP+2 

3486 

*22442 

105767 

013*56 



TSTB 

TEMP 

3487 

022446 

001401 




BEQ 

,+4 

3488 

022450 

104000 




HLT 


3489 

922492 

104400 




SCOPE 


3490 








349* 

022454 

012767 

125252 

013142 


MOV 

#125252, TEMP 

5492 

922462 

105177 

013140 



COMB 

0TEMP+2 

3493 

922466 

122767 

052525 

0*3130 


CMP3 

#052525, TEMp 

3494 

922474 

C01401 




BEQ 

,4-4 

3495 

922476 

104090 




HUT 


3496 

922500 

104400 




SCOPE 


3497 








3498 

922502 

005067 

0131*6 



CUR 

temp 

3499 

022506 

105277 

013114 



INCB 

• TEMP-+2 

3500 

922512 

12276 7 

000001 

013104 


CMPB 

#1, TEMP 

8501 

*22520 

00*401 




BEQ 

,★4 

3502 

*22522 

104000 




HUT 


3503 

922524 

104400 




SCOPE 


8504 








8505 

022526 

005067 

013072 



clr 

temp 

3506 

922532 

105377 

013070 



DECB 

•TEMP*? 

35S7 

922536 

126727 

0*3062 

177777 


CMPB 

temp, #* t 

3508 

922544 

00*401 




BEQ 

,+4 

8509 

022546 

104000 




HUT 


85*0 

922550 

104400 




SCOPE 


35*1 








35*2 

922552 

012767 

000001 

013044 


MOV 

#i,‘tEmp 

85*3 

022560 

105477 

0*3042 



NEGB 

9TEMP+2 

35*4 

922564 

122767 

177777 

013032 


cmpb 

#«1,TEMP 

35*5 

922572 

001401 




BEQ 

, *4 

8516 

922574 

104000 




HUT 


35*7 

022576 

104400 




SCOPE 
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3318 







3519 

*2?600 

012767 

177777 

013016 

MQV 

#«1»TEMP 

3520 

*2?606 

000261 



SEC 


3521 

9(22610 

105577 

013012 


ADCB 

0TEMP+2 

3522 

9*22614 

022767 

177400 

013002 

CMP 

#177400 , TEMp 

3523 

9 22622 

001401 



BEG! 

, +4 

3524 

9)22624 

104000 



HIT 


3525 

9(22626 

109767 

012772 


TSTB 

TEMP 

3526 

*122632 

501401 



BED 

,54 

3527 

9(22634 

104000 



HIT 


3528 

*•22636 

104400 



SCOPE 


3529 







3530 

522640 

012767 

000001 

012756 

MQV 

n.-TEMP 

3531 

522646 

000261 



SEC 


3532 

522690 

105377 

012792 


DECS 

PTEMP+2 

3533 

522694 

005767 

012744 


TST 

TEMP 

3534 

522660 

001401 



BEG 

,+4 

3535 

522662 

104000 



HLT 


3536 

522664 

104400 



SCOPE 


3537 







3538 

522666 

012700 

177772 


MOV 

#*6 * R0 

3539 

522672 

127027 

035602 

125252 

ChpB 

•AIRP), #123252 

3540 

522700 

001401 



BEG 

.+4 

3541 

522702 

104000 



HLT 


3542 

522704 

104400 



SCOPE 


3543 







3544 

522706 

512700 

177772 


MOV 

#*6,P0 

3545 

522712 

122770 

125292 

035602 

CmpB 

#125252 , ® A ( R0 ) 

3546 

522720 

001401 



BEQ 

.+4 

3547 

522722 

104000 



HLT 


3548 

522724 

104400 



SCOPE 


3549 







3550 

522726 

012700 

177772 


MQV 

#*6,r0 

3551 

522732 

■012731 

000002 


m 0 V 

#+2,Rl 

3552 

522736 

127071 

035602 

039602 

CmpB 

•A<R&),#A(R 1 ) 

3553 

522744 

001401 



BEQ 

, +4 

3554 

522746 

104000 



HLT 


3555 

522790 

104400 



SCOPE 


3556 







3557 

522792 

012700 

000006 


MQV 

#+ 6 ,R 0 

3558 

522796 

012767 

177777 

012640 

MQV 

m.TEwp 

3559 

5227*4 

147067 

035602 

012632 

R I CB 

®A(R0) ,TEMP 

1560 

522772 

122767 

125252 

012624 

CMPB 

*125252, Temp 

3561 

523000 

001401 



BEQ 

, +4 

3562 

523002 

104000 



HLT 


3563 

523004 

104400 



SCOPE 


3564 







3565 

923006 

512700 

177772 


MOV 

#w6,R0 

3566 

9-23012 

012767 

177777 

012574 

MOV 

#wl,C 

3567 

923020 

142770 

125252 

039624 

B 1 CB 

#125252, »TEMP(R0) 

3568 

923026 

126727 

012562 

000125 

CMPB 

C» #000129 

3569 

923034 

001401 



BEG 

, +4 

3570 

923036 

104000 



HLT 


8571 

923040 

104400 



SCOPE 
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3572 









3573 

023042 

012700 

035574 



MOV 

#B+2 , R0 


3574 

023046 

023067 

012520 



CMP 

®(R0)*,B 


8575 

023092 

001401 




BEQ 

, + 4 


3576 

023094 

104000 




HLT 



3577 

023096 

1044O0 




SCOPE 



3578 









3579 

023060 

012700 

035576 



MOV 

#B+4,R0 


3580 

023064 

025067 

012902 



CMP 



8581 

023070 

001401 




BEQ 

, +4 


3582 

023072 

104000. 




HLT 



3583 

023074 

104400 




SCOPE 



3584 









3535 

*•23076 

O12700 

035576 



MQV 

#B+4,R0 


3586 

023102 

125067 

012464 



CMPB 

»MR0)|3 


3587 

*•23106 

O01401 




BEQ 

, +4 


3588 

023110 

1040O0 




HLT 



8589 

023112 

104400 




SCOPE 



3590 









3591 

023114 

012700 

035620 



MQV 

# C *■ 4 1 R 0 


8592 

023120 

012767 

177777 

012466 


MQV 

#*1,C 


3593 

023126 

105050 




CLRB 

<a«(R0) 


8594 

023130 

026727 

012460 

177400 


CMP 

C, #177400 


8595 

023136 

001401 




BEG 

» +4 


8596 

023140 

104000 




HLT 



3997 

023142 

104400 




SCOPE 



3598 









3599 

023144 

012767 

177777 

012442 


MOV 

#*1,C 


3600 

023192 

012700 

177772 



MOV 

# 96 , R 0 


8601 

023196 

012701 

177772 



MOV 

#? 6 , R 1 


3602 

023162 

147071 

035602 

035624 


B I CB 

$9A<R0> ,S>TEMp*Ri') 


3603 

023170 

02276 7 

177529 

012416 


CMP 

#177525, C 


8604 

023176 

001401 




BEG 

, +4 


3605 

023200 

104000 




HLT 



3606 

023202 

104400 




SCOPE 



3607 

023204 

012700 

052525 



MOV 

#52525, R0 


8608 

023210 

104400 




SCOPE 



3609 









3610 





, SBTTL 

test usr Instruction 


36il 









3612 

023212 

004767 

000002 



jsr 

PC, T jSR2 

JPLACE pc ON STACK 

3613 

023216 

000405 



TJSR1I 

BR 

TJSR3 

) RETURN WERE ON RTS R19 

3614 

023220 

021627 

023216 


TJSR2I 

CMP 

®SP,#TJSR 1 

1 CHECK FOR CORRECT PC On STACK 

3615 

023224 

001401 




BEQ 

r+4 


3616 

023226 

104000 




HLT 


UNCQRPECT pc on STACK 

8617 

023230 

000207 




RTS 

PC 

{ RETURN TO IMST AFTER JSR 

3618 

023232 

104400 



TJSR3J 

SCOPE 



8619 









3620 

023234 

000257 




ccc 



8621 

023236 

004717 




JSR 

PC,®PC 

{INSTRUCTION UNDER TfST 

8622 

023240 

021627 

023240 



CMP 

•sp,r, 

{TEST THE STACK 

3623 

023244 

0014O1 




BEQ 

,*4 


3624 

023246 

104000 




HLT 


1 PC OF JSR DID NOT GO To STACK 

8625 

023290 

005726 




TST 

<SP) + 

{REPOSITION THE STACK 
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OiSGAC'.Ptl test jsr instruction 


3626 

*232*2 

1044*0 




SCOPE 



8627 









3628 





.sbttl 

TEST I 

NESTED SUBROUTINES 


3629 









3630 

*232*4 

*00257 




ccc 


1 CLEAR CONDITION CODES 

1631 

*232*6 

*04 767 

012030 



US* 

PC # SUBSPA 


8632 

*232*2 

1004*1 




BMI 

, +4 


3633 

*23264 

104000 




WLT 


1 J S R OR RTS TAILED 

8634 

*23266 

*014*1 




BEQ 

,♦4 


8635 

*23270 

1040*0 




HLT 


1 JSR OR RTS TAILED 

3636 

*23272 

1024*1 




9VS 

, +4 


8637 

*23274 

1040*0 




mlt 


IJSR OR RTS TAILED 

3638 

*23276 

1034*1 




BCS 

,44 


8639 

*233*0 

1040*0 




ML.T 


1 JSR OR RTS TAILED 

3640 

f 4 / i 

*233*2 

1044*0 




SCOPE 



3641 

3642 





.sbttl 

TEST 1 

ROTATE ODD BYTE 


3643 









3644 

*233*4 

1044*0 




SCOPE 



3645 

*233*6 

*00257 




ccc 


1 CLEAR "C" 

3646 

*23310 

*12767 

123456 

*123.06 


MOV 

#123456 , TEW? 


3647 

*23316 

106067 

*12303 



RQRB 

temp+i 

J ROTATE ODD BYTE 

3648 

*23322 

1034*1 




BCS 

,44 


8649 

*23324 

1040*0 




WLT 


1C NOT SET 

8650 

*23326 

1024*1 




BVS 

,+4 


8651 

*23330 

1040*0 




HLT 


IV NOT SET 

8652 

*23332 

*22767 

051456 

012264 


CMP 

#051456, temp 


8653 

*23340 

*0l 4*1 




BEQ 

,44 


8654 

*233*2 

1040*0 




HLT 


1 ROTATE TAILED 

8655 

*23344 

1044*0 




SCOPE 



3656 









3657 

*23346 

000277 




see 


1 SET C 

8658 

*23350 

*12767 

123456 

012246 


MQV 

#123456, T£Mp 


3659 

*23356 

106067 

*12243 



RORB 

TtMp+l 


3660 

*23362 

1034*1 




BCS 

.4-4 


8661 

*23364 

1040*0 




HLT 


1C NOT SET 

8662 

*23366 

1020*1 




BVC 

,44 


8663 

*23370 

1040*0 




HLT 


IV NOT CLEARED 

3664 

*23372 

*22767 

151456 

012224 


CMP 

#151456, TEMP 


‘3665 

*234*0 

*014*1 




BEO 

, 44 


8666 

*234*2 

1040*0 




HLT 


} ROTATE TAILED 

8667 

*234*4 

1044*0 




SCOPE 



8668 









8669 

*234*6 

00*257 




CCC 



8670 

*23410 

*12767 

123456 

0122*6 


MOV 

#123456, TEMP 


8671 

*23416 

106167 

0122*3 



RQLB 

TEMP+1 


8672 

*23422 

1034*1 




BCS 

, +4 


8673 

*23424 

104000 




HLT 


1C NOT SET 

8674 

*23426 

1024*1 




BVS 

,44 


3675 

*23430 

1040*0 




HLT 


IV NOT SET 

3676 

*23432 

*22767 

047056 

*12164 


CMP 

#047*56 , TE^P 


3677 

*23440 

*014*1 




BEQ 

,44 


3678 

*23442 

1040*0 




HLT 


IROTATE BYTE FAILED 

3679 

*23444 

1044*0 




SCOPE 
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20GAC',PU 

TEST ROTATE ODD 

BYTE 




3680 








3681 

*23446 

000277 



see 


I SET C 

3682 

*23450 

*12757 

123456 

012146 

MOV 

#123456, TEMP 


3683 

023456 

106167 

012143 


RQLB 

TEMp*i 


3684 

*23462 

103401 



BCS 

, +4 


8685 

*23464 

104000 



HLT 


1C NOT SET 

3686 

023466 

1024*1 



BVS 

, +4 


3687 

823470 

104000 



HLT 


IV NOT SET 

3688 

023472 

322767 

047456 

012124 

CMP 

#047456, TEMp 


3689 

0235*0 

001401 



BEQ 

i *4 


3690 

*235*2 

1040.9)0 



HLT 


IROTATE ODD BYTE FAILED 

3691 

*235*4 

1044210 



SCOPE 



3692 








3693 

*235*6 

00O257 



CCC 


I CLEAR C 

3694 

*23510 

012767 

177777 

0121O6 

MQV 

#n,TEMp 


3695 

023516 

106267 

012103 


A8RS 

TEMP+1 


3696 

*23522 

103401 



BCS 

, +4 


3697 

*23524 

1040*0 



HLT 


1C NOT SET 

3698 

*23526 

102001 



BVC 

,+4 


3699 

*23530 

104000 



HLT 


IV NOT CLEARED 

'37*0 

*23532 

026727 

012066 

177777 

CMP 

temp,#*i 


37*1 

*23540 

*014*1 



BED 

, +4 


37*2 

*23542 

1040O0 



HLT 


ISHIET FAILED 

87*3 

*23544 

104400 



SCOPE 



37*4 








3705 

*23546 

000277 



see 



37*6 

*23550 

012767 

177777 

012046 

MOV 

#*1,TEMP 


3707 

*23556 

106367 

012043 


aslb 

TEMP+l 


3708 

*23562 

103401 



BCS 

,+4 


37*9 

*23564 

1040*0 



HLT 


>C NOT SET 

3710 

*23566 

102001 



eve 

, * 4 


3711 

*23570 

104000 



HLT 


IV NOT CLEARED 

3712 

*23572 

026727 

012026 

177377 

CMP 

TEMP ,#177377 


3713 

*23600 

001401 



BEQ 

• *4 


3714 

*236*2 

1040O0 



HLT 


ISHIET BYTE FAILED 

3715 

*236*4 

104400 



SCOPE 



3716 

*236*6 

005067 

155224 


CLR 

I COUNT 

JNQ ITERATION 

3717 

*23612 

*32767 

004000 

153750 

BIT 

#4000, SR 


3718 

*23620 

001402 



BEQ 

COMPAR 


3719 

*23622 

000167 

001200 


JMP 

TS45 


3720 








3721 




, SBTTL 

TEST , 

all combinations 

OF NUMBERS WITH COMPARE INSTRUCTION 

3722 








3723 

*23626 

005003 


COMPARi 

t CLR 

R3 

1 INIT R3 

3724 

*23630 

005001 



CLR 

R1 

UNIT R1 

3725 

*23632 

020301 


CMP1I 

CMP 

R3.R1 

JARE THE EQUAL 

3726 

*23634 

001401 



BEQ 

,*4 


3777 

*23636 

104000 



WLT 


JR3 AND R1 DID NOT COMPARE 

3728 

*23640 

*20327 

177777 


CMP 

R3,#*l 

i at upper limit 

3729 

*23644 

0014*3 



BEQ 

CMP2 

I YES EXIT 

3730 

*23646 

*05203 



INC 

R3 

1 INCREMENT tO NEXT NUMBER 

3731 

*23650 

005201 



INC 

R1 


3732 

*23652 

000767 



BR 

CMPl 


3733 

*23654 

104400 


CMP2I 

SCOPE 
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ozqgac'.pu TEST ALL combinations or NUMBERS WITH COMPARE INSTRUCTION 


3734 

$23696 

000297 




ccc 



3735 

$23660 

012767 

020001 

011736 


MOV 

$ 20001 , TEM P 


3736 

$23666 

006067 

011732 



RQR 

TEMP 


3737 

$23672 

103401 




PCS 

.+4 


3738 

$23674 

104000 




HLT 



3739 

$23676 

000257 




ccc 



3740 

$23700 

006167 

011720 



ROL 

TEMP 


3741 

$23704 

022767 

$20000 

011712 


CMP 

#20000, TEMP 


3742 

$23712 

001401 




BEQ 

, *4 


3743 

$23714 

104000 




HLT 



3744 

$23716 

104400 




SCOPE 



3745 

8746 





.SBTTl 

TEST 

rotating all numbers 


3747 









3748 

$23720 

012767 

023732 

159136 


MOV 

#ROTAlL«RETURN 

# SET UP SCOPE LOOP RETURN! 

3749 

$23726 

005067 

000124 



CLR 

REF 

I CLEAR TEST DATA 

3750 

$23732 

016767 

000120 

000120 

ROfALL! 

MOV 

REFF , TEST 


3751 

$23740 

006067 

000114 



ROR 

TEST 


3752 

$23744 

$06067 

000110 



RQR 

TEST 


3753 

$23790 

006067 

000104 



ROR 

TEST 


3754 

$23794 

006167 

000100 



rol 

TEST 


3755 

$23760 

006167 

000074 



ROL 

TEST 


3796 

$23764 

006167 

000070 



ROL 

TEST 


3757 

$23770 

100004 




PPL 

,+12 


3758 

$23772 

103037 




BCC 

,+20 

JZ*1 

3799 

$23774 

102013 




eve 

,+30 

IZU, Cal 

87 60 

$23776 

104000 




HIT 


1 Z*C , BUT Val 

3761 

$24000 

000411 




BR 

,+24 


3762 

$24002 

103006 




BCC 

,+16 

IZ = 0 

3763 

$24004 

102407 




evs 

,+20 

JZ*0, Cal 

3764 

$24006 

104000 




HUT 


JZ NOT EQUAL C, V*i 

3765 

$24010 

000409 




BR 

,+14 


3766 

$24012 

102404 




BVS 

, +12 

JZ»1, C a 0 

3767 

$24014 

104000 




MLT 


IZ NOT EQUAL C, V*1 

3768 

$24016 

$00402 




BR 

, +6 


3769 

$24020 

102001 




BVG 

, +4 

J Z s 0 , Ca0 

3770 

$24022 

104030 




MLT 


JZ = C, BUT Val 

3771 

$24024 

$26767 

000030 

000024 


CMP 

TEST, REFF 


3772 

$24032 

001401 




BEQ 

.+4 


3773 

$24034 

104000 




MLT 


1 INITIAL NOT EQUAL TO STAI 

3774 

$24036 

104400 




SCOPE 



3775 

$24040 

012767 

023732 

155016 


MQV 

#ROTALLi R ETURN 


3776 

$24046 

$05267 

000004 



INC 

REFF 


3777 

$24092 

$01327 




BNE 

rotall 


3778 

$24094 

$00402 




BR 

TSRT2A 


3779 

$24096 

$00000 



REFFI 

0 



3780 

$24060 

000000 



TEST 1 

0 



8781 


024096 




REFaREFF 


8782 

3783 





, SBTTL 

TEST 

ROTATING BYTE EVEw/nDD, 

all numbers 

8784 









3785 

$24062 

005067 

177770 


TSRT2AI 

clr 

REFF 


3786 

$24066 

$12767 

024074 

154770 


MQV 

#H0T8Ei RETURN 


8787 

$24074 

$16767 

177796 

177756 

ROfBEl 

MOV 

REFF, TEST 
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OZQGAC'.PU TEST ROTATING byte EVEN/ODd, ALL NUMBERS 


8788 

$24102 

106067 

177752 



rqrb 

TEST 

» ROTATE BYTE Even 

3789 

$24106 

106067 

177746 



RQRB 

TEST 


3790 

$24112 

106067 

177742 



RORB 

TEST 


3791 

$24116 

106167 

177736 



«0LB 

TEST 


3792 

$24122 

106167 

177732 



rolb 

TEST 


3793 

$24126 

106167 

177726 



rolb 

TEST 


3794 

$24132 

100004 




BPL 

,+12 


3795 

$24134 

103007 




BCC 

,+20 

IZ*1 

3796 

$24136 

102013 




BVC 

,+30 

iZ?l» Cal 

8797 

$24140 

104000 




HLT 


J Z S C , BUT Val 

3798 

$24142 

000411 




BR 

,+24 


3799 

$24144 

103006 




BCC 

,+16 

J Z s 0 

38C0 

$24146 

102407 




BVS 

,+20 

JZ 3 0. Cal 

8801 

$24190 

104000 




HLT 


JZ NOT EQUAL C, Va* 

3802 

$24192 

000405 




BR 

,+14 


3803 

$24194 

102404 




BVS 

.+12 

12*1, C a 0 

8804 

$24156 

104000 




MLT 


JZ NOT EQUAL C, V*1 

3805 

$24160 

000402 




BR 

, +6 


3806 

$24162 

102001 




BVC 

.+4 

J Z s 0 , CsB 

3807 

$24164 

104000 




MLT 


JZ*C, But Val 

3808 

$24166 

026767 

177666 

177662 


CMP 

TEST, REFF 


8809 

$24174 

001401 




BEQ 

,+4 


3810 

$24176 

104000 




MLT 



3811 

$24200 

106067 

177695 


ROfBQI 

RORB' 

TEST+1 

J ROT ATE BYTE ODD 

3812 

$24204 

106067 

177651 



RORB 

TEST+1 


3813 

$24210 

106067 

177645 



RORB 

TEST+1 


3814 

$24214 

106157 

177641 



rolb 

TEST+1 


3815 

$24220 

106167 

177635 



rolb 

TEST+1 


3816 

$24224 

106167 

177631 



rolb 

TEST + 1 


3817 

$24230 

100004 




BPL 

,+12 


3818 

$24232 

103007 




BCC 

,+20 

JH = 1 

3QI9 

$24234 

102013 




BVC 

,+30 

12=1, Cai 

3820 

$24236 

104000 




HLT 


)Z?C, BUT Val 

3821 

$24240 

000411 




BR 

,+24 


3822 

$24242 

103006 




BCC 

,+16 

12*0 

3823 

$24244 

102407 




BVS 

,+20 

12*0* Cal 

3824 

$24246 

104000 




MLT 


JZ NOT EQUAL C, V*! 

3825 

$24290 

000405 




BR 

, + 14 


3826 

$24292 

102404 




BVS 

,+12 

I 2*1 « Caj) 

3827 

$24294 

104000 




HLT 


JZ NOT EQUAL C, V»* 

3828 

$24296 

000402 




BR 

, +6 


3829 

$24260 

102001 




BVC 

, +4 

J H = 0 i Ca0 

8830 

$24262 

104000 




HLT 


* 2*C , BUT Val 

3831 

$24264 

026767 

177570 

177564 


. CMP 

TEST, REFF 


8832 

$24272 

001401 




BEO 

,+4 


8833 

$24274 

104000 




HLT 



8834 

$24276 

104400 



ROfENli 

SCOPE 



8835 

$24300 

012767 

024074 

154556 


MOV 

#ROTBE, RETURN 


8836 

$24306 

005267 

177544 



INC 

REF 


8837 

$24312 

001270 




BNE 

RQTBE 


8838 









8639 





.SBTTl 

TEST 

ADD And SUBTRACT all 

NUMBERS AGAINST FIXED NUMBERS 

8840 









8841 





JA+BaC, 

C«A»B 

« BF SHOULD EQUAL Bl 
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OISGAC'.PU TEST ADD ANp SUBTRACT ALL NUMBERS AGAINST FIXED NijMarRS 


3842 










3843 

*24314 

*11667 

*00066 


TSfARl 1 

MOV 

PSP t MUmA 



3844 

*24320 

*12767 

*24332 

154536 


MQV 

* ADSUB, RETURN 



3645 

*24326 

*05067 

177524 



CLR 

REFF 



3846 

*24332 

*16767 

177520 

177520 

ADSUB 1 

MQV 

REF, TEST 



3847 

*24340 

066767 

000042 

177512 


ADD 

NUMA, TEST 



3848 

*24346 

166767 

000034 

1775*4 


SUB 

NUMA, TEST 



3849 

*24354 

026767 

177476 

177476 


CMP 

REF, TEST 



3850 

*24362 

001401 




BED 

,+4 



3851 

*24364 

104000 




MLT 




3852 

*24366 

104400 




SCOPE 




3853 

*24370 

*12767 

*24332 

154466 


MQV 

#ADSUB|RETURM 



3854 

*24376 

*05267 

177454 



INC 

REFF 



3855 

*244*2 

001353 




BNE. 

ADSUB 



3856 

*244*4 

0004*2 




PR 

TCOMA 



3857 

*244*6 

00*0*0 



NUMA 1 

0 




3858 

*24410 

1044*0 



AR f END J 

SCOPE 




3859 










3860 





» sbttl 

TEST 

COMPLIMENTING all NUMBERS 



3861 










3862 

*24412 

*12767 

024430 

154444 

TCqmAJ 

MOV 

#TCOM, RETURN 



8863 

*24420 

005067 

0112*0 



CLR 

TEMP 

{BASF DATA 


•8864 

*24424 

005067 

*11230 



CLR 

TEMp+4 

1 B ASF REFERENCE 


3865 

*24430 

*05167 

011170 


TC3MI 

COM 

TEMP 

JCOMPLIMENT DATA 


8866 

*24434 

005367 

011170 



DEC 

TEMP+4 

idecrement reference 


8867 

*24440 

026767 

*11160 

011162 


CMP 

TEMP, TEMP+4 

I COMPARE 


3868 

*24446 

*014*1 




BEG 

,+4 

1 TEST 


3869 

*24450 

1040*0 




WLT 


{COMPLIMENT OR DECREMENT 

FAILED 

3870 

*24452 

1044*0 




SCOPE 




3871 

*24454 

*12767 

*24430 

154402 


MOV 

#TCOM, RETURN 



8872 

*24462 

*05167 

011136 



COM 

TEMP 



8873 

*24466 

*05267 

*11132 



INC 

TEMP 

{INCREMENT AND TEST FOR 

DONE 

3874 

*24472 

*01356 




BNE 

TCOM 

{NOT FINISHED GO LOOP 


3875 










3876 





.sbttl 

TEST 

comb (EVEN BYTE) 



3877 










3878 

*24474 

005067 

011124 



clr 

TEMP 

{BASF DATA 


3879 

*245*0 

*05067 

011124 



CLR 

TEMP+4 

{REFERENCE DATA 


3860 

*245*4 

012767 

024512 

154352 


MOV 

#TC0M2, return 



3881 

*24512 

105167 

0111*6 


TC0M2I 

COMB 

temp 



3892 

*24516 

005367 

*111*6 



DEC 

TE’MP + 4 



3883 

*24522 

126767 

011076 

011100 


CMPB 

TEMP, TEMP+4 

{COMPARE 


3884 

*24530 

*014*1 




BED 

, +4 



3885 

*24532 

104000 




MLT 


{COMPLIMENT OR INCREMENT 

BYTE Ft 

3686 

*24534 

1044*0 




SCOPE 




3887 

*24536 

*12767 

024512 

154320 


MQV 

#TC0M2, return 



3868 

*24544 

105167 

011054 



COMB 

temp 



3689 

*24550 

105267 

011050 



INCB 

TEMP 



5890 

*2*554 

*01356 




RNE 

TC0M2 



3891 










3892 





• S8TTL 

TEST 

COMB (ODD BYTE) 



3893 










3894 

*24556 

*05067 

011042 



CLP 

temp 

{BASF DATA 


3895 

*24562 

*05067 

011042 



CLR 

TEMP + 4 

{REFERENCE DATA 
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02QGAC ( Pi i TEST COMB (ODD BYTE) 


3896 

$24566 

*12767 

024574 

154270 


MOV 

#TCQM3# RETURN 


3897 

*24574 

105167 

*11025 


TCOM31 

COMB 

TEMP + l 

{ ODD BYTE 

3898 

$2 4 6*0 

005367 

011024 



DEC 

TEMP+4 


3899 

*246*4 

126767 

011015 

*11016 


CMPB 

TEMP+l,TEMP+4 


89*0 

$24612 

001401 




9EQ 

,♦4 


39*1 

$24614 

104000 




HLT 


{COMPLEMENT BYTE FAILED 

39*2 

$24616 

104400 




SCOPE 


39*3 

$24620 

*12767 

024574 

154236 


MOV 

*TC0M3| RETURN 


39*4 

$24626 

105167 

010773 



COMB 

TEMP+i 


3905 

$24632 

105267 

010767 



INCB 

TEMp+l 


39*6 

$24636 

*01356 




BNE 

TC0M3 


39*7 

$24640 

012767 

024646 

154216 


MQV 

#TSCQMli R ETUPN 


39*8 









3909 





, SBTTL 

TEST 

COMPARE ALL VALUE even 

BYTE WITH 000 

3910 









3911 

$24646 

005067 

010752 


TSCOMlI 

CLR 

TEmP 

{BASE VALUE 

3912 

$24652 

126767 

010746 

*10745 

tscqmbi 

CMPB 

TEMp.TEMP + l . 

{COMPARE 

3913 

$24660 

0014*1 




BED 

,+4 


3914 

$24662 

1040*0 




MLT 


{compare failed 

3915 

$24664 

*020*1 




BGE 

, *4 

3916 

$24666 

1040*0 




HLT 


IV IS NOT s TO N 

3917 

$24670 

0034*1 




RLE 

, +4 

3918 

$24672 

1040*0 




HLT 


{V IS SET 

39i9 

$24674 

062767 

0004*1 

010722 


ADD 

#401, TEMP 

3920 

$247*2 

*22767 

177777 

010714 


CMP 

#sl,TEMP 


3921 

$24710 

*01360 




BNE 

TSCOM0 


3922 

$24712 

1044*0 




SCOPE 



3923 









3924 





, SBTTL 

TEST 

SWAB 


3925 









3926 

$24714 

*12767 

0002*0 

177136 


MOV 

#020* * TEST 


3927 

$24722 

000367 

177132 



SWAB 

TEST 


3928 

$24726 

1000*1 




BPL 

,+4 


3929 

$24730 

1040*0 




HLT 



3930 

$24732 

*014*1 




BED 

,+4 


3931 

$24734 

104000 




HLT 



3932 

$24736 

*00367 

177116 



SWAB 

TEST 


3933 

$24742 

1004*1 




BMI 

. + 4 


3934 

$24744 

104000 




HLT 



3935 

$24746 

*010*1 




BNE 



3936 

$24750 

104000 




HLT 



3937 

$24752 

104400 




SCOPE 



3938 

$24754 

*05037 

001036 



CLP 

I COUNT 


8939 








3940 

3941 

3942 





.SBTTL 

TEST 

all Combinations of swa 

p 

$24760 

*05067 

177074 



CLR 

test 

{NUMBER UNDER TEST 

3943 

$24764 

*05067 

177066 



CLR 

ref 

{REFERENCE NUMBER 

3944 

$2 4 770 

000367 

177064 


swabai 

SWAB 

TEST 

{OPERATION UNDER TESt 

3945 

$24774 

*26767 

177060 

177054 


CMP 

TEST, REF 

{TEST SWAB INSTRUCTION 

3946 

$250*2 

3014*1 




BED 

i+4 


3947 

$250*4 

1040*0 




HLT 


> S W A B FAILED 

3948 

$250*6 

*00367 

177046 



SWAB 

TEST 

3949 

$25012 

*05267 

177040 



INC 

REF 

j increment reference number 



iHL*M 

TEST PROGRAM 

MACYll; 

624 ?4« 

-0CT;73 

20120 

PAGE 78 


ZQGAC'.PU 

TEST AI.L COMBINATIONS OF' SWAP 




3950 

*25016 

105267 

177037 



I NCB 

TEST *1 

1 INC TEST NUMBER 

3951 

725022 

001362 




PNE 

SWABA 

j loop till done 

3952 

*25024 

104400 




SCOPE 



3953 

3954 

725026 

032767 

300002 

154026 

T S 4 5 1 

PIT 

P2.C0NEIG 

J IF PROCESSOR IS NOT 

3955 

725034 

001002 




PNE 

XORl 

JPOP-11/40 OR 45 

3956 

725036 

000167 

002522 



JMP 

ENDPRQ 

IEXIT PROCESSOR TEST 

3957 









3958 





1 SBTTL 

PDP-11/40,45 INSTRUCTION TESTS 


3959 









3960 





1 SBTTL 

TEST 

xqr instruction 


3961 









3962 

725042 

012702 

000010 


XQRl 1 

HQ V 

#10, R2 

j set up index resistor 

3963 

725046 

012701 

052525 



MOV 

#52525, R1 

JLOAD SOURCE OPERAND 

3964 

725052 

012767 

177777 

010544 


' MOV 

#*1,TEMP 

ILOAO DESTINATION OPrR/NO 

3965 

725060 

074162 

335614 



XQR 

R1 1 C ( R2 } 

IXOR SOURCE, BEST', 

3966 

725064 

022767 

125252 

010532 


CMP 

#125252, TEMp 


3967 

725072 

001401 




BEO 

, +4 


3968 

725074 

104000 




HLT 



3969 

725076 

104400 




SCOPE 



3970 









3971 





.SBTTL 

TEST 

XOR USING INDEX DEFERRED 


3972 









3973 

725100 

012701 

125252 



MOV 

#125252, R1 

J LOAD SOURCE OPERAND 

3974 

725104 

012702 

000010 



MOV 

#10, R2 

1 LOAD INDEX REGISTER 

3975 

725110 

012767 

035624 

010476 


MOV 

#temp,c 

? SET UP DEFERRED ADDRESS 

3976 

725116 

012767 

035634 

010500 


MOV 

#D, TEMP 

J SET UP FINAL ADDRESS (D) 

3977 

725124 

012767 

177777 

010502 


MOV 

#*1iD 

J LOAD DESTINATION OPERAND 

3978 

729132 

074172 

035614 



XQR 

R1,9C(R2) 


3979 

725136 

022767 

052525 

010470 


CMP 

#52525,0 

J CORRECT RESULT? 

3980 

725144 

001401 




PEG 

. 74 


3981 

725146 

104000 




wlt 


J XOR -1,125252 FAILED 

3982 

725150 

104400 




SCOPE 



3983 









3984 





.SBTTL 

TEST 

SOB For BRANCH 


8985 









3986 

725152 

000401 




PR 

S0B1 


3987 

725154 

000404 



SQB2I 

PR 

S083 


3988 

725156 

012731 

000010 


SOB1I 

MOV 

#10, Pi 


3989 

7251*2 

077134 




SOP 

R1,SCB2 


3990 

725164 

104030 




MLT 


1 SOB SHOULD HAVE BRANCHED 

3991 

725166 

104430 



S0B3I 

SCOPE 



3992 









8993 





.SBTTL 

TEST 

SOB F’OR NO PR4 N cH 


3994 









3995 

725170 

000402 




PR 

S0B4 


3996 

725172 

104000 



S0651 

HLT 


ISOB SHOULD NOT MAyE BRANCHED 

3997 

725174 

000433 




RR 

SUB6 


3998 

725176 

012701 

000001 


SOB4 1 

MOV 

#1, R1 


3999 

725202 

077105 




SOB 

R1.S0B5 


4000 

725204 

104430 



SQB6I 

SCOPE 



1001 









6002 









4003 





.SBTTl 

TEST 

MARK INSTRUCTION 



eneraL 

TEST program 

MACYll', 624 24 bOCT;73 

2*120 

PAGE 79 


20GAC;pU 

TEST MARK INSTRUCTION 




#004 








#0P5 

*29036 

*12706 

036520 


MQV 

#STACK,SP 

initialize stack pointer 

#006 

*25212 

005001 



clr 

R1 


#007 

*29214 

*127«6 

000007 


MOV 

47, -(SP) 


#008 

*25220 

*12746 

*000*1 


MOV 

# 1 , - ( SP ) 

JPUSH A PARAMETER on the stack 

#009 

*29224 

*12746 

006401 


MOV 

#marki,-(sp> 

J PUSH MARK1 ON THE STACK 

1010 

*29230 

*10605 



MOV 

SP , R5 

J LOAD PARAMETER POINTER 

#0il 

*29232 

*04767 

000002 


USR 

PC, MARK0 

1 GO TO SUBROUTINE 

#012 

*29236 

*00403 



PR 

MARK3A 


#013 

*252*0 

0165*1 

000002 

MARK*! 

MOV 

2<R5),R1 

iget the parameter 

10*4 

*25244 

000205 



RTS 

R5 

IEXIT SUBROUTINE 

#015 

*29246 

022701 

000001 

MARK3AI 

CMP 

m,Ri 

I DID SUBROUTINE GET THE PARAMETER 

#016 

*29292 

0014*1 



BED 

1 * 4 . 


40*7 

*29294 

104000 



HLT 


J ERROR { SUBROUTINE DTD NOT GFT PUSHED PARAMETER 

#018 

*29256 

0227*6 

036520 


CMP 

#STACK,SP 

MS STACK POINTER CORRECT ? 

#019 

*29262 

*014*1 



BE0 

,+4 


#020 

*29264 

104000 



HLT 



#021 

*29266 

*22705 

*00007 


CMP 

#7,R5 

MS R5 CORRECT? 

#022 

*25272 

*01401 



BEQ 

.+4 


#023 

*25074 

104000 



HLT 


I ERROR I MARK DID NOT LOAD R5 

#024 

*25276 

104400 



SCOPE 



#025 








#026 




.SBTTL 

TEST 

THE SXT INSTRUCTION 


#027 








#028 

*29330 

312702 

000010 


MQV 

#10, R2 

1 SET UP INDEX REGISTER 

#029 

*25334 

012767 

177777 

01*312 

MOV 

#*1,TEMP 


#030 

*25312 

*00257 



ccc 


t CLEAR ALL CONDITION CODES 

#031 

*25314 

*06762 

*35614 


SXT 

C(R2) 

1 EXTEND 0<S INTO TEMP CC(R2M 

#032 

*25320 

*05767 

010300 


T ST 

TEMP 


#033 

*25324 

0014*1 



BED 

,♦4 


#034 

*29326 

104000 



HLT 


1 ERROR } 0<S DID NOT EXTEND INTO TEMP 

#035 

*29330 

104430 



SCOPE 



#036 








#037 

*25332 

005067 

010266 


clr 

temp 


#038 

*29336 

*00277 



■see 


l SET ALL CONDITION CODES 

#039 

*25340 

*06767 

*10260 


SXT 

TEMP 

J EXTEND 1<S INTO TEMP 

#040 

*29344 

*22767 

177777 

010252 

CMP 

#-l, TEMP 


#041 

*25392 

*014*1 



BE9 

1 + 4 


#042 

*29354 

104000 



HLT 



#043 

*25356 

104430 



SCOPE 



#044 








#045 




, SElTTL 

TEST 

THE RTT INSTRUCTION 


#046 








#047 

*29360 

*12706 

036520 


MQV 

#STACk,SP 

jreset the stack pointer 

#046 

*29364 

*16702 

152406 


MOV 

PS.R2 

1 SET UP THE STACK 

#049 

*25370 

010246 



MOV 

R2.MSP) 


#050 

*29372 

*12746 

*254*4 


MOV 

#RTT A , s ( Sp ) 


#051 

*29376 

000006 



RTT 



#052 

*29400 

104000 



HLT 


JERRORJ RTT FAILED 

#053 

*29402 

0004*5 



PR 

RTTB 

1 GO TO SCOPE 

#054 

*254*4 

*16701 

152366 

RTTAI 

MQV 

PS.Rl 

1 GET STATUS WORD 

#055 

*25410 

020201 



CMP 

R2.R1 

J CORRECT STATUS? 

#056 

*29412 

*01401 



BED 

RTTB 


#057 

*25414 

104000 



HLT 


J ERROR I INCORRECT STATUS 



GENERAL Test PROGRAM MACm;6Z4 24«0CT;73 2P? ; 20 PAGE 8P 

D2QGAC*. Pil TEST THE RTT INSTRUCTION 


4056 

4259 

725416 

104400 



RTfBl 

SCOPE 


4060 

4061 

725420 

132767 

000001 

153435 


B I TB 

#i,ccnfig+i 

4062 

4063 

4064 

4065 

725426 

001002 




ONE 

MUL1 

725430 

000167 

001374 



JMP 

MANAGl 





; sb-tt'l 

TEST MULTIPLY JnST*UCT!oi 

4066 








4067 

725434 

005003 



MULU 

CLR 

R3 

4068 

725436 

0127O2 

000005 


MOV 

#5, R2 

4069 

725442 

O12704 

000010 



MOV 

#10,R4 

4070 

725446 

012767 

000002 

010150 


MOV 

#2, TEMP 

407i 

725454 

000277 




sec 


4072 

725456 

070274 

035616 



MUL 

PC*2(R4),R2 

4073 

725462 

016701 

152310 



MOV 

PS,R1 

4074 

725466 

032701 

000017 



BIT 

#17, R1 

4075 

725472 

001401 




BEQ 

i *4 

4076 

725474 

104000 




HLT 


4077 

725476 

022703 

000012 



CMP 

#12, R3 

4078 

725502 

001401 




BED 

.♦A 

4079 

725504 

104000 




HLT 


4060 

725506 

005702 




TST 

R? 

4081 

725510 

001401 




BEQ 

,+4 

4082 

725512 

104000 




HLT 


4083 

725514 

104400 




SCOPE 


4064 








4085 







R3 

4086 

725516 

005003 



MUL’21 

c l r 

4087 

725520 

012702 

125252 


MOV 

#125252, R2 

4088 

725524 

312701 

000010 



MOV 

#10,R1 

4089 

725530 

012767 

000002 

010066 


MOV 

#2, TEMP 

4090 

725536 

070271 

035616 



MUL 

0C*2(R1> ,R2 

4091 








4092 

725542 

016704 

152230 



MQV 

PS , R4 

4393 

725546 

742704 

177760 



BiC 

#177760, R4 

4094 

725552 

022704 

000011 



CMR 

#11, R4 

4095 

725556 

001401 




BED 

,+« 

4096 

725560 

104000 




HLT 


4097 

725562 

022702 

177777 



CMP 

#n«P2 

4098 

725566 

001401 




RED 

,★4 

4099 

725570 

104030 




HLT 


4100 

725572 

022703 

052524 



CMP 

#52524 ,R3 

4101 

725576 

001401 




BED 

,♦4 

4102 

725600 

104000 




HLT 


4103 

4104 

4105 

725602 

104400 




SCOPE 






.sbttl 

TEST 

ASh INSTRUCTION 

4126 








4107 

725604 

012767 

000001 

010012 

ASCII 1 

MQV 

#1,TEmP 

4108 

725612 

’(12705 

000010 



MQV 

#10, R5 

4109 

725616 

016702 

007750 



MOV 

B,R2 

4110 

725622 

052767 

00001.4 

152146 


BIS 

#14 , PS 

4111 

725630 

072275 

035616 



ASH 

<*C + 2(R5),R2 


general 

TEST PROGRAM 

MACYli; 
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D2QGAC', 

pii 

TEST ASH INSTRUCTION 




4112 








4113 

025634 

016701 

152136 



MOV 

PS.R1 

4114 

825640 

*42701 

177760 



BIC 

#177760, Rl 

4115 

*25644 

*227*1 

00*003 



CMP 

#3,R1 

4116 

825650 

*01431 




BEQ 

,*4 

4117 

825632 

104000 




HLT 


4118 

*25654 

*22702 

*52524 



CMP 

#52524 i R2 

4119 

825660 

*014*1 




BEO 

, +4 

4120 

*25662 

104000 




HLT 


4121 

*25664 

104400 




SCOPE 


4122 








4123 

*25666 

*12767 

177777 

*07730 

ASr2 J 

MOV 

#*1,TEMP 

4124 

*25674 

*12703 

*00010 



MOV 

#10, R3 

4125 

*25700 

016701 

*07672 



MQV 

B-M,R1 

4126 

825704 

072173 

035616 



ASH 

*0*2 ( R3 ) , Rl 

4127 

*25710 

020127 

025252 



CMP 

Rl, #25252 

4128 

*25714 

*014*1 




BEO 


4129 

*25716 

104000 




HLT 


4130 

*25720 

104400 




SCOPE 


4131 








4132 





.SBTTl 

TEST , 

AS H C INSTRUCTION 

4133 








4134 

*25722 

005002 



ASrCI | 

clr 

R2 

4135 

*25724 

*12767 

*00020 

007672 


MOV 

#16', , TEMP 

4136 

*25732 

*12704 

*00010 



MOV 

#10, P4 

4137 

*25736 

016703 

*07630 



MOV 

B,R3 

4138 

*25742 

112767 

000005 

152026 


MQVB 

#5 , PS 

4139 

*25750 

073274 

035616 



ASHC 

PC*2(R4),R2 

4140 

*25754 

*16701 

152016 



MOV 

PS,R1 

4141 

*25760 

*427*1 

177760 



BIC 

#177760, Rl 

4142 

*25764 

0227*1 

*00012 



CMP 

#12, Rl 

4143 

*25770 

001401 




BEQ 

» *4 

4144 

*25772 

104000 




HLT 


4145 

*25774 

*22702 

125252 



CMP 

#125252, R2 

4146 

*26000 

0014*1 




BEO 

,+4 

4147 

*26002 

104000 




HLT 


4148 

*26004 

005703 




TST 

R3 

4149 

*26006 

301401 




BEO 

,*4 

4150 

*26010 

104000 




HLT 


4131 

*26012 

1044*0 




SCOPE 


4152 








4153 

*26014 

005003 



ASHC2I 

clr 

R3 

4154 

*26016 

012767 

177760 

007600 


MOV 

# f 1 6 , ,TE m P 

4155 

*26024 

0127*1 

000010 



MOV 

#10, Rl 

4156 

*26030 

*167*2 

007536 



MOV 

B|R2 

4157 

*26034 

112767 

*00007 

151734 


MQVB 

#7 , PS 

4158 

*26042 

*73271 

035616 



ASHC 

PC-*2 ( Rl ) i R2 

4139 

*26046 

*167*4 

151724 



MOV 

PS g R4 

4160 

*26052 

*427*4 

177760 



BIG 

#177760, R4 

4161 

*26056 

*227*4 

*00010 



CMP 

#10, R4 

4162 

*26062 

*01401 




BEO 

,*4 

4163 

*26064 

104030 




mlt 


4164 

*26066 

*227*2 

177777 



CMP 

#*1,R2 

4165 

*26072 

*014*1 




BEQ 

,+4 


iip processor does 

I NOT HAVE El S 
I CHECK FOR KTlt 


I CUE AR R3 
> LOAD MULTfPICANO 

« load index register 

I LOAD MULTIPLIER 
IPRESET CONQITION CODES 

IMULTIPLY 2X5 RESULT IN R2 < HSH > ; R3 (L?H> 
I GET CONDITION CODE RESULTS 
»CC« S«0? 

IBRANCM if cc#s are. correct 
I ERROR I CC*$ NOT a TO *>S 
I RESULT *12? 

IBRANCH IF THE RESULT ILSH) IS CORRECT 
I ERROR I INCORRECT RESULT (LSH) 

I CORRECT RESULT (MSH ) ? 

MNCORRECT RESULT (MSH) 


J LOAD MULT IP 1 CANO 
I LOAD INDEX REGISTER 

IMULTJPLY 2X125252 RESULT*^! ( R2 ) 
j52524{R3>,N«l,Z*0,Vs0,C*l 
J SAVE CONDITION COOES IN REGISTER 4 
I EXTRACT CONDITION CODES 


I ERROR I INCORRECT CONDITION COOES 
J CORRECT MSH RESULT? 

I ERROR j INCORRECT MSN RESULT 
ICORRECT LSH RESULT? 

J ERROR I INCORRECT L'SH RESULT 


ILQAO SHIFT VALUE i+1 OR 1 PLACE iZFl) 
I LOAD INDEX REGISTER 
J GET VALUE TO BE SHIFTED (#12525?) 

I SHIFT 1 PLACE LEFT RESULT s 52524 


IN«0»Z?0» V»1»C*1 

ISAVE CONDITION COOES IN REGISTER 1 
I EXTRACT CONDITION CODES 


I ERROR f INCORRECT CONDITION CODES 
IRESULT CORRECT? 

1 ERROR I INCORRECT RESULT 


JLOAD ShI^T VALUE M OR 1 PLACE RjGhT) 
I LOAD INDEX REGISTER 
I GET VALUE TO BE SHIFTED (#52525) 

J SHIFT 1 PLACE RIGHT RESULT * #25252 
IRESULT CORRECT? 

I ERROR } INCORRECT RESULT 


iclear MSh result register 

I LOAD SHIFT COUNT {If PLACES LEFT) 

I LOAD INDEX REGISTER 
J GET VALUE TO BE SHIFTED (#125252) 
IPRE SET THE CONDITION CODES 
ISHIFT # IN R3 TD R2 
ISAVE CONDITION CODES IN REGISTER 1 
I EXTRACT CONDITION CODES 


I ERROR I INCORRECT CONDITION CODES 
IR2«#125252? 

IBRANCH IF CORRECT RESULT 
J ERROR I 

I WAS # SHIFTED OUT OF R3? 

I ERROR » # WAS NOT SHITED OUT OF R3 PROPERLY 


i clear result register 

JLOAD SHIFT COUNT {16 PLACES RIGHT) 
ILOAD INDEX REGISTER 


JLOAD # TO BE SHIFTED *#125252) 

IPRE SET THE CONDITION CODES 
ISHIFT R2 16 PLACES RIGHT INTO R3 
ISAVE CONDITION CODES IN REGISTER 4 
I EXTRACT CONDITION CODES 


I error i incorrect condition codes 
f DID SIGN EXTEND IN R2? 



general; 

TEST PROGRAM 
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D2QGAC , Pll 

TEST ASHC INSTRUCTION 





4166 

726074 

104000 




h l t 


1 ERROR t SIGN FAILED TO EXTEND 

4167 

72*076 

022703 

125252 



CMP 

#125252, R3 

IDID R2 SHIFT TO R3 

4168 

726102 

001401 




BED 

, +4 


4169 

726104 

104000 




WIT 


1 ERROR I R2 DID NOT SwlPT INTO R3 

4170 

726106 

104400 




SCOPE 



4171 









4172 





,SBTTt 

TEST 

THE DIVIDE INSTRUCTION 


4173 









4174 

726110 

012701 

000004 


civil 

MQV 

#4,R1 

1 load index register 

4175 

726114 

005002 




CL.R 

B2 

1 CLEAR QUOTIENT REGISTER 

4176 

726116 

012703 

052525 



MOV 

#52525, R3 

1 LOAD ISM DIVIDEND 

4177 

726122 

000277 




see 


IPRE SET THE CONDITION CODES 

4178 

726124 

0712*1 

035572 



D1V 

B(Rl),R2 

1 DIVIDE #52525 BY G(Pl) (#52525) 

4179 








JQUOTIENTii,REM80,C*N«V*Z*0 

4180 

726130 

016704 

151642 



MOV 

PS.R4 

1 GET THE CONOITION CODES 

4181 

72 6 134 

732704 

000017 



BIT 

#17 , R4 


4182 

726140 

001401 




BEQ 

,*4 

JBRANCH if 0 

4183 

726142 

104000 




WLT 


I ERROR I INCORRECT CONDITION COOES 

4184 

726144 

020227 

000001 



CMP 

RH.n 

1 QUOTIENT correct? 

4185 

726150 

001401 




BEQ 

,*4 

IBRANCW if the QUOTIENT IS CORRECT 

4186 

72*152 

104000 




hlt 


1 ERROR I INCORRECT QUOTIENT 

4187 

526154 

005703 




TST 

R3 

IREMAINOER CORRECT? 

4188 

72*156 

001401 




BEQ 

,*4 

IBRANCH IF THE REMAINDER IS CORRECT 

4189 

72*160 

104000 






1 ERROR 1 INCORRECT REMAINDER 

4190 

72*1*2 

104400 




SCOPE 



4191 









4192 

72*1*4 

012703 

000010 


0IV2I 

MOV 

#10, R3 

1 load Index register 

4193 

726170 

012704 

157777 



MOV 

#157777 1 B4 

1 LOAD MSH DIVIDEND 

4194 

72*174 

012705 

100001 



MOV 

#100001, R5 

1 load LSH dividend 

4195 

72*200 

0127*7 

100000 

007416 


MOV 

# 100000 , temr 

1 load divisor Into temp 

4196 

726206 

071473 

035616 



OIV 

PD+2 ( R3 ) , R4 

IDIVIDE #157777 100001 BY 100000 

4197 








J QUOTIENT* 40000 *REM»i00001,C«N*V *2 »0 

4198 

726212 

016701 

1515*0 



MOV 

or 

:n 

CL 

1 GET THE CONDITION CODES 

4199 

72*216 

032701 

000017 



BIT 

#17,R1 


422-0 

72*222 

001401 




BEQ 

,♦4 

IBRANCH IF 0'S 

4201 

72*224 

104000 




MLT 


1 ERROR l INCORRECT CONDITION COOES 

4202 

72*226 

020427 

040000 



CMP 

R4, #40000 

JQUOTIENT CORRECT? 

4203 

72*232 

001401 




BEQ 

,♦4 

IBRANCH IF THE QUOTIENT IS CORRECT 

4204 

72*234 

104030 




hlt 


» ERROR 1 INCORRECT QUOTIENT 

4205 

72*236 

020527 

100001 



CMP 

R5, #100001 

IREMAINOER CORRECT? 

4206 

72*242 

001401 




BEQ 

1 *4 

IBRANCH IF THE REMAINDER IS CORRECT 

4207 

72*244 

104030 




HLT 


1 ERROR ! INCORRECT REMAINDER 

4208 

726246 

104430 




SCOPE 



4209 









4210 

72*250 

132767 

000002 

152605 


SITB 

#2,COnFIC+1 

1 1 F PROCESSOR IS PDPplt/40 

4211 

726256 

301006 




BNE 

COMEIS 

IWITH FIS, EXECUTE FlS tEST 

4212 

72*260 

1327*7 

000004 

152575 


8ITB 

#4,C0NFIG*1 

) I F PROCESSOR IS PdPLll/45 

4213 

72*2*6 

001121 




BNE 

COMFPP 

IWITH FPP » EXECUTE FPP TEST 

4214 

72*270 

0001*7 

000534 



JMP 

MANAG1 

ICHECK MEMORY MANAGEMENT 

4215 









4216 





•S8TTC 

TEST 

ALU F is INSTRUCTIONS TOGETHER 

4217 









4218 

726274 

012704 

026530 


COMF1 SI 

MQV 

#F I SSTK ♦ B4 

1 SET STACK POINTER 

4219 

72*300 

012744 

107070 



MOV 

#107070, »(R4) 

1 LOAD DATA ONTO SUCK 



general; 

T£ST PROGRAM 
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DiOGAC'iPtl 

TEST ail FIS INSTRUCTIONS TOGETHER 



4220 

9*26304 

012744 

134343 


MQV 

#134343, «{R4) 


4221 

*2*310 

012744 

065432 


MOV 

#065432, -<R4) 


4222 

*2*314 

012744 

032107 


MQV 

#032107 1 * ( R 4 ) 


4223 

*2*320 

012744 

123456 


MQV 

#123456, *<R4) 


4224 

*2*324 

012744 

045670 


MQV 

#045670, **( R 4 ) 


4225 

*2*330 

*12744 

1252*2 


MOV 

#125252, «(«4) 


4226 

*2*334 

*12744 

135252 


MQV 

#135252, *< R 4> 


4227 

*26340 

012744 

01*1*1 


MOV 

#016161, -(R4) 


4228 

*2*344 

012744 

040616 


MOV 

#040616, -(«4) 


4229 

*2*350 

000240 



NQP 



4230 

*2*3^2 

075014 



FSU8 + 

R4 1135252, 

125252^040616,016161*140616,017434 

4231 

*2*354 

075034 



FDIV* 

R4 J 045670, 

t23456’7l406i6 < 017434*145246, *47065 

4232 

*2*356 

075024 



FMUL* 

R4 1032107, 065432*145246, 047065*13720? ,106137 

*233 

*2*3*0 

075004 



F ADD* 

R4 1134343, 

107070*137201 ,106137*137203;, 115230 

*234 

*2*3*2 

*167*7 

151410 

0075*4 

MQV 

PS, ANS3 

1 SAVE PROCESSOR STATUS 

*235 

*2*370 

0427*7 

000020 

007476 

BIC 

#20, ANS3 

1 CLEAR T BIT FROM RESUl'T 

1236 

*2*376 

0124*7 

0074*6 


MOV 

<R4)+,ANSl 

ISAVE FIRST HACF OF ANSWER 

*237 

*2*402 

*12467 

007464 


MOV 

(R4)*,ANS2 

1 SAVE SECOND HALF OF ANSWER 

*238 

*2*406 

0104*7 

007464 


MQV 

R4,ANS4 

ISAVE FINAL STAC* POINTER 

*239 

*2*412 

122767 

000010 

007454 

CMPB 

#10 , ANS3 

ICHECK FINAL PSW 

*240 

*2*420 

*01401 



BEQ 

,+4 


*241 

*2*422 

104000 



hlt 


IFINAL PSW INCORRECT 

*242 

*2*424 

0227*7 

026530 

007444 

CMP 

#F I SSTK, ANS 4 

ICHECK STACKPOINTER POSITION 

4243 

*2*432 

001401 



BEQ 

, +4 


4244 

*2*434 

104000 



HLT 


istack POINTER incorrect 

*245 

*26436 

0227*7 

137201 

007424 

CMP 

#137201, ansi 

ICHECK FIRST HALF OF ANSWER 

*246 

*2*444 

001401 



BEQ 

, +4 


*247 

*2*446 

1040*0 



HLT 


IFJRST HALF OF ANSWER INCORRECT 

*248 

*2*450 

0227*7 

115230 

007414 

CMP 

#115230, ANS2 

ICHECK SECOND HALF OF ANSWER 

1249 

*2*456 

001401 



BEO 

1 *4 


4250 

*2*4*0 

104000 



hlt 


1 SECOND HALE OF ANSWER INCORRECT 

4251 

*2*4*2 

104400 



SCOPE 



*252 

*2*4*4 

0001*7 

0003«0 


JMP 

MANAGl 


*253 


026530 


4-40 




*254 

*2*530 

000000 


FISSTK'I 

B 



4255 








4256 




•sbttl 

COMBINED Fpp INSTRUCTION 

TEST 

*257 








*258 

*2*532 

170127 

047400 

COmFPP 1 

ldfps 

#47400 


*259 

*2*536 

170011 



SETD 


1 SET DOUBLE MODE 

*260 

*2*540 

177027 

077777 


toejo 

#77777, AC0 

1 LOAD AC0 WITH 77777 

*261 

*2*544 

177127 

002525 


LDC ID 

#2525, AC1 

I LOAD ACl WITH 2325 

1262 

*2*550 

012702 

000012 


MQV 

#12,R2 

1 SET STEP COUNTEP 

*263 

*2*554 

174401 


EXL*OP 1 

0 1 VD 

ACl | AC0 

IDIVIDE 2325 INTO 77777 

4264 

12*556 

171001 



MUIQ 

ACl, AC0 

IMULTIPLY 2525 &9 ANSWER 

*265 

*2*5*0 

172001 



ADDD 

AC1.AC0 

1 ADD 2529 TQ ANSWER 

1266 

*2*5*2 

173001 



SUBQ 

ACl, AC0 

1 SUBTRACT 2525 FROM ANSWER 

*267 

*2*5*4 

005302 



DEC 

R2 

IDO 10 (DECIMAL) TIMES 

4268 

*2*5*6 

001372 



BNE EXLOP 


1269 

*2*570 

1754*7 

007 274 


STCDI 

AC0, ANSI 

ISAVE ANSWER 

*270 

*2*574 

170200 



STFPS 

FPS 

ISAVE FPS 

*27l 

*2*576 

022767 

077777 

007264 

CMP 

#77777, ANSI 

IIS result correct? 

4272 

*2***4 

001401. 



BEQ 

.*« 

1 YES* BRANCH 

*273 

*2*606 

104000 



HLT 


1 RESULT INCORRECT 
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4274 

726610 

172467 

007022 

EX4 ! 

LDD 

D1010.AC0 

( GET DATA 

4275 

* 2 * 6 1 4 

012702 

336070 


MOV 

• ANSI * R2 


4276 

726620 

174022 



STD 

ACC? , (R2) + 


4277 

*26622 

172567 

307010 


LDD 

D101O * AC1 


4278 

326626 

174122 



STD 

ACl, (R2) + 


4279 

326630 

172767 

007244 


IDO 

ANS5,AC3 


4280 

726634 

170230 



STEPS 

PPS 


4281 

326636 

173767 

307226 


CMPD 

ANSI# AC3 


4282 

32*642 

170030 



CFCC 



4283 

326644 

301401 



BED 

,♦4 


4284 

326646 

104000 



HL.T 


1 ANSI AND ANS5 SHOULD k 1010 

4285 

3266^0 

172567 

006764 


LOD 

00101, ACl 


4286 

*26694 

174142 



STD 

AC1,«<R2) 


4287 

*2*696 

172012 



ADOD 

{ R2 > i AC0 


4288 

326660 

173042 



SURD 

-* < R2 } , AC0 


4289 

32*662 

173001 



S(JBD 

A.0 1 1 A C 0 


4290 

*26664 

175467 

307200 


STCOI 

AC0, ANSI 


4291 

326670 

322767 

300000 

307172 

CMP 

•0 i ANSI 


4292 

*26676 

170200 



STEPS 

FPS 


4293 

326700 

301401 



9EQ 

, +4 


4294 

*26702 

3 040P0 



M I»T 



4295 

*2*704 

170001 


M ORE 1 

SETF 


1 SET FLOATING MODE 

4296 

326706 

177027 

000525 


LDCIF 

•525, AC0 


4297 

*26712 

177127 

000292 


LDCIF 

•252, ACl 


4298 

*26716 

174134 



STF 

ACl,AC4 


4299 

*26720 

172104 



ADOF 

AC4,AC1 

1 ADD 252 TO 252 

4370 

326722 

172701 



LDP 

ACl a AC3 

IPUT ANSWER IN AC3's c 24 

4371 

*26724 

173003 



SURF 

ACS, AC0 

1 SUBTRACT 524 FROM 5?5 

43 22 

*26726 

175067 

307136 


STEXP 

AC0, ANSI 

I ANSWER IN ANSI 

4373 

*26732 

1 7 n 2 ^ 0 



STFPS 

FPS 


4324 

*26734 

022767 

000001 

007126 

CMP 

Hi, ANSI 

(CORRECT ANSWER SHOULD 8E 1 

4335 

326742 

301401 



BED 

,*4 


4376 

*26744 

104000 



ML? 


; FPP ANSWER INCORRECT 

4337 

*26746 

177027 

000021 


LDCIF 

•21, AC0 


4328 

326792 

171000 



MULF 

A C 0 , A 0 0 

J AC0#21X2ls441 

4309 

726794 

174427 

040400 


D1VF 

•2, AC0 

(DIVIDE BY 2 

4310 

*26760 

1714?7 

040200 


MQ0F 

#1,AC0 

I GET INTEGER 

43il 

326764 

170200 



STFPS 

FPS 


4312 

326766 

175567 

007076 


STCFI 

ACl, ANSI 


4313 

*26772 

.122767 

000220 

007070 

CMP 

•220, ANSI 

JCHECK ANSWER (INTEGER PART) 

4314 

327000 

001401 



REQ 

, +4 


4315 

327002 

104030 



HUT 


JANSWER INCORRECT 

4316 

327004 

171427 

041040 


MODF 

• 10, , A C 0 
ACl, ANSI 

J GET FRACTION 

4317 

327010 

175567 

007054 


STCFI 


4318 

327014 

G 2 ? 7 6 7 

000005 

007046 

CMP 

#9, ANSI 

(FRACTION CORRECT? 

4319 

327022 

001401 



BED 

, +4 

I YES* BRANCH 

4320 

327024 

104000 



wlt 


IFRACTIONAL PORTION INCORRECT 

4321 

327026 

104400 



SCOPE 



4322 








4323 

327030 

122767 

000003 

152024 MANAGII 

CMPB 

#3,CDN f I g 

1 IF PROCESSOR IS POP^H/45 

4324 

327036 

C01406 



BED 

MTPDt 

(execute these tests 

4325 

*27040 

132767 

000010 

. 192015 

BITS 

#10 , CQNF I G+l 

(IF PROCESSOR is POP*ll/40 

4326 

327046 

301002 



BNP 

MTPD1 

(AND HAS MEMORY MANAGEMENT 

4327 

327090 

000167 

000510 


JMP 

enqpro 

(OPTION, EXECUTE THESE TESTS 
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d2qgac;>U combined fpp instruction TEST 

4328 

4329 ,SBTTL TEST MTpO INSTRUCTION 

4330 


4331 

*27094 

012767 

035624 

006544 

MTPQli 

MOV 

• TEMP * TEMp + 2 


4332 

*27062 

*05001 




CUR 

R1 


4333 

*270*4 

012706 

£36520 



MOV 

•STACK, SP 


4334 

*27070 

012746 

177777 



MQV 

#*l,w(SP> 


4335 

*27074 

*05066 

000002 



CLR 

2 ( SP ) 


4336 

*2 7 1O0 

005067 

006520 



CLR 

TEMP 


4337 

*27104 

*00257 




CCC 



4338 

*271*6 

*16703 

150664 



MOV 

PS,R3 

(SAVE STATUS wDRS 

4339 

*27112 

052703 

000011 



BIS 

m,R3 

(INSERT RESULT OP MTPDlS CC<S 

4340 

*27116 

*002*1 




SEC 


(SET CARRY 

4341 

*2*120 

106671 

035626 



MTPp 

®>TEMP*2 < R 1 > 


4342 

*27124 

*16702 

150646 



MQV 

PS,R2 

(GET STATUS 

4343 

*27130 

020302 




CMP 

R3, R2 

IIS STATUS CORRECT? 

4344 

*27132 

001401 




RED 

i *4 


4345 

*27134 

104000 




HLT 


I ERROR ! INCORRECT STATUS AFTER MTPO 

4346 








J R3 HAS CORRECT RESULT 

4347 

*27136 

026727 

0064*2 

177777 


CMP 

TEMP, #»1 

(DID TOP WORD ON STACK GO TO TEMP? 

4348 

*27144 

0014*1 




BED 

, +4 


4349 

*27146 

104000 




hlt 


( ERROR I MTPQ FAILED TO LOAD TEMP 

4350 

*27190 

022706 

036520 



CMP 

•STACK, SP 

(DID THE STACK POINTER INCREMENT? 

4351 

*27194 

0014*1 




BEQ 

, 44 


4352 

*27196 

104000 




HLT 


(ERROR I STACK FAILED TO INCREMENT 

4353 

* 2 7 1 6 0 

104400 




SCOPE 



4354 









4355 

4356 





•SBTTt 

TEST 

MFpO INSTRUCTION 


4397 

*271*2 

*127*6 

036520 



MQV 

#STAC«,SP 


4358 

*27166 

012716 

177777 



MOV 

Ml, (SP) 

(PRESET THE 

4359 

*27172 

*12766 

177777 

177776 


MQV 


(STACK 

4360 

*2*2*0 

005067 

006420 



CLR 

TEMP 


4361 

*27204 

005002 




CLR 

R2 


4362 

*2*206 

*12767 

035624 

006420 


MOV 

#TEMP,TEMP+10 


4363 

*2*214 

*00257 




CCC 



4364 

*2*216 

000262 




SEV 



4365 

*2*220 

1065*2 

035634 



MFPD 

»TEMP+10(R2) 


4366 

*2*224 

016701 

150546 



MQV 

PS.Rl 

(SAVE CONDITION COOES IN REGISTER 1 

4367 

*2*230 

042701 

177760 



bic 

#177760, Rl 

(EXTRACT CONDITION CODES 

4368 

*2*234 

022701 

000004 



CMP 

#4,R1 

(ONLY t It SHOULD BE SET 

4369 

*2*240 

*01401 




BEQ 

, *4 


4370 

*2*242 

104000 




HLT 


(ERROR! INCORRECT CONDITION CODE RESULTS 

4371 

*2*2*4 

0227*7 

17*777 

007246 


CMP 

Ml, STACK 

(WAS TOP WORD ON STACK CHANGED? 

4372 

*2*292 

001401 




REQ 

, + 4 


4373 

*2*294 

1040*0 




HLT 


(ERROR! STACK DID NOT DECREMENT BEFORE PUSH 

4374 

*2*296 

005767 

00*234 



TST 

STACK B 2 


4375 

*2*262 

001401 




PEG! 

.*4 


4376 

*2*264 

104000 




HLT 


(ERROR! MFU FAILED 

4377 

*2*266 

0227*6 

036516 



CMP 

#ST ACK*»2, SP 

(DID STACK POINTER DECREMENT 

4378 

*2*272 

001401 




BED 

, *4 


4379 

*272*4 

104000 




HLT 


(ERROR! POINTER FAILED fO DECREMENT 

4380 

*2*276 

1044 00 




SCOPE 



4381 
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QZQGAC'i 

PU 

TEST MFPD INSTRUCTION 





4382 

£27300 

032767 

000001 

151554 


BIT 

#1, CONFIG 

MF PROCESSOR IS NOT PDp-11/45 

4383 

£27306 

001526 




REG 

endpro 

IEXIT PROCESSOR TEST 

4384 









4385 





. SSTTl 

TEST 

TWE SPL INSTRUCTION 


4386 









4387 

£27310 

042767 

000340 

150460 


BIC 

#340 | pS 

i clear priority level bits if set 

4388 

727316 

000277 




sec 


1 SET CONDITION CODES 

4389 

£27320 

016702 

150452 



MOV 

PS, R2 


4390 

727324 

052702 

000340 



BIS 

#340 * R2 


4391 

027330 

700277 




see 


J SET CONDITION CODES 

4392 

727332 

000237 




SPL 

7 

1 SET PRIORITY LEVEL *7 

4393 

727334 

016701 

150436 



MOV 

PS,Ri 

1 GET STATUS WORD 

4394 

727340 

■32721 

140000 



BIT 

#UM,R1 

JKERNEL MODE! 

4395 

727344 

■’01402 




BED 

,+6 

J BRANCH IF KERNEL MODE 

4396 

727346 

'742702 

000340 



BIC 

#340 , R2 

1 SPL IS A A NOP f IN SPERVISORY & USER 

4397 

727352 

020201 




CMP 

R2,R1 

J WAS PRIORITY LEVEL SET INTO STATUS 

4398 

727354 

001401 




BED 

,** 

1 (KERNEL ; MODE ONLY) 

4399 

* 2 7 3 9 6 

104000 




ML T 


1 ERROR I SPL FAILED To $eT PRIORITY = 

4400 

727360 

042767 

000340 

150410 


PIC 

#340,pS 


4401 

727366 

104400 




SCOPE 



4402 









4403 





.sbttl 

TEST 

P I HQ HARDWARE 



4404 
4 4 $5 

4406 

4407 

4408 


ITwIS TEST REQUESTS AN INTERRUPT AT LEVEL 3, ThE 

f INITIAL PRQCESSEK PRIORITY is at LEVEL' 7 AND IS SUCCESIVELY LOWERED 
JUnTIL TWE PROCESSER PRIORITY IS LESS THAN THE REQUEST 
J LEVEL AT WHICH TIME THE INTERRUPT REQUEST SHOULD BE HONORED', 


4409 

727370 

012706 

036520 


MOV 

#STACK»SP 

J SET STACK POINTER 

4410 

727374 

016701 

150376 


MQV 

PS.Rl 

1 save: PROCESSOR STATUS 

44il 

727400 

042701 

177757 


BJC 

#177757 , Ri 

I EXTRACT T BIT 

4412 

727404 

112767 

000340 

150364 

MQVB 

#340 , PS 

I SET PROCESSER PRIORITY LEVEL *7 

*413 

727412 

012767 

004000 

150352 

MQV 

#*000 , P I RQ 

J REQUEST AN INTERRUPT AT LEVEL 3 

4414 

727420 

022767 

004146 

150344 

CMP 

#*1*6 , P I RQ 

1 WAS PIRO REG LOADED PROPERLY 

4415 

727426 

001402 



BED 

,+6 


4416 

727430 

104000 



HLT 


1 ERROR ! P I RQ NOT LOADED PROPERLY 

4417 

727432 

000442 



RR 

P I RQFX 

IEXIT TEST 

4418 

727434 

012767 

027532 

150576 

MQV 

#P I RQA » P I R V EC 

1 LOAD INT, REQUEST VECTOR 

4419 

727442 

016767 

150330 

150572 

MOV 

ps.pirlvl 


4420 

727450 

0002*0 



NQP 



4421 

727492 

112767 

000300 

150316 

MQVB 

#300 , pS 

1 LOWER PRIORITY TO LEVEL 6 

4422 

727460 

000240 



NQP 



4423 

727462 

112767 

0002*0 

150306 

M OVB 

#240 , PS 

ILQWER PRIORITY TO LEVEL 5 

4424 

727470 

0002*0 



NQP 



4425 

727472 

112767 

00O200 

150276 

MQVB 

#200* PS 

ILOWER PRIORITY TO LEVEL 4 

4426 

727500 

7002*0 



MOP 



4427 

727502 

112767 

0001*0 

150266 

MQVB 

#140 , PS 

JLOWER PRIORITY TO LEVEL 3 

4428 

727510 

0002*0 



MQP 



4429 

727512 

012767 

027536 

150520 

MOV 

#P I RQB » P I RVEC 

1 REPOS I T I ON VECTOR 

4430 

727520 

11276 7 

000100 

150250 

MOVB 

#100, PS 

JLOWER PRIOITY TO LEVEL 2 AN INTERRUPT 

4431 







ISHQULD OCCUR 

4432 

727526 

104000 



HLT 


JERROR! INTERRUPT FAILED 

4483 

727530 

000403 



BR 

P I RQFX 

IGO TO EXIT 

4434 

727532 

104000 


PIRQAI 

wlt 


1 ERROR ! AN INTERRUPT OCCURRED WHEN 

4435 







JPROCESSER PRIORITY ^REQUEST LEVEL 
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Pll 

test pirq hardware 





4436 

^27534 

000401 




RR 

PIRQEX 

) GO TO EXIT 

4437 

**27536 

7002*0 



P I RQB 1 

NQP 



4438 

7275*0 

005067 

150226 


PIRQEXI 

CLR 

PIRQ 


4439 

7275*4 

012767 

0002*2 

150466 


MQV 

#242 , P I RVEC 

J RESTORE VECTOR 

4440 

727592 

005067 

150*64 



CLR 

PIRLVL 


4441 

727596 

110167 

150214 



MQVB 

R1,P$ 


4442 

4443 

727562 

104400 




SCOPE 



4444 

727564 

005767 

006000 


ENtiPROl 

TST 

PFFlAG 

i set when power fails 

4445 

727570 

001404 




REG 

WAITS 

J EXECUTE WAIT TEST 

4446 

727572 

005067 

005772 



clr 

PFFLAG 

1 CLEAR FLAG FOR NEXT POWER FAIL 

4447 

727576 

000167 

152590 



JMP 

ST 

IRESTAPT PROGRAM AND DEVICES 

4448 









4449 





, SBTTL 

TEST OF 

WAIT (TRACE TRAPS) 


4450 









4451 

727602 

705067 

151230 


WAJTS 1 

clr 

ICQUNT 


4452 

9127606 

022767 

000006 

004174 

CMP 

#6,TRTRET 

1 IF 11/45, BYPASS THIS CODE 

4453 

727614 

001414 




BEG 

WAIT3 


4454 

727616 

104400 




SCOPE 



4455 

727620 

012767 

000100 

151210 


MOV 

#100, icount 


4456 

#27626 

032767 

000020 

150142 


BIT 

#20 , PS 

IIS TRACE BIT SET 

4457 

727634 

001404 




BEG 

WAIT3 

JBRANCH IF NOT FOUND 

4458 

#27636 

000001 




WAIT 


J TRACE SHOULD PASS US 

4459 

7276*0 

000001 




WAIT 


JTHROUGH THE WAIT INSTRUCTION 

4460 

#276*2 

000001 




WAIT 



4461 

7276*4 

000001 




WAIT 



4462 

727646 

104400 



WAIT3I 

SCOPE 



4463 









4464 





, SBTTL 

TEST TO 

SEE IF I/Q DFViCES 

WERE SELECTED 

4465 









4466 

727690 

016705 

151170 



MQV 

SR1,R5 

1 GET FIRST DEVICE SELECTION REGISTER 

4467 

727694 

005105 




CQM 

R5 

4468 

727696 

032705 

173794 



BIT 

#173754,R5 

1 IF NO INTERRUPTING DEVICES 

4469 

727662 

001014 




3NE 

HAITI 

ICHECK NEXT SR 

4470 

727664 

016705 

151156 



MQV 

SR2,R5 

1 GET SECOND DEVICE SELECTION REGISTER 

4471 

727670 

005105 




CQM 

R5 


4472 

027672 

032705 

144637 



BIT 

#144637,85 

1 IF NO INTERRUPTING DEVICES SELECTED 

4473 

727676 

001006 




BNE 

WAIT1 

ICHECK NEXT SR 

4474 

727700 

316705 

1511*4 



MQV 

SR3.R5 

1 GET THIRD DEVICE SELECTION REGISTER 

4475 

727704 

005105 




COM 

R9 


4476 

727706 

032705 

000000 



BIT 

#0, R5 

1 1 F NO INTERRUPTING DEVICES SELECTED 

4477 

727712 

001407 




BEG 

WAIT4 

JBRANCH IF NO DEVICES SELECTED 

4478 

727714 

012767 

000100 

191114 

WAITII 

MQV 

#100, icqunT 


4479 

727722 

000001 




WAIT 


J INTERRUPTS WILL OCCUR 

4480 

727724 

000001 




WAIT 


MF DEVICES ARE SELECTED 

4481 

727726 

000001 




WAIT 



4482 

727730 

000001 




WAIT 



4483 

727732 

104400 



WAJT4| 

SCOPE 



4484 

727734 

012737 

004000 

001036 


MQV 

#4000,0#ICOUNT 


4485 









4486 

727742 

036727 

151100 

000100 


BIT 

SR2,#100 


4487 

727790 

001402 




BEG 

,♦6 


4488 

4489 

727752 

000167 

000364 



JMP 

ENOEAE 
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4490 

4491 


4527 


, S9TTU TEST «EU*A (pOp*U/*0i L'S*T S^IPT 


4492 

*2*756 

012777 

000000 

151240 

MOV 

#0 l ®MQ 

IEOAD MG WITH 0 

4493 

*27764 

012777 

125252 

151234 

MQV 

#125252 i ® AC 

JLOAB AC WITH 125252 

4494 

*27772 

012777 

177760 

151242 

MOV 

#«16, i*ESR 

1 LOAD SHIFT COUNt tLSHI WITH *16 

4495 

*30000 

022777 

000000 

151220 

CMP 

#0,9 AC 

ICOMPARE AC WITH 0 

4496 

23W6 

001401 



BEQ 

i*4 

1 GO TO ERROR IF RAO 

4497 

23*010 

104000 



WET 



4498 

230012 

222777 

125252 

151204 

CMP 

#125252, »MQ 

ICOMPARE MQ WITH 125252 

4499 

230020 

001401 



BES 

.*4 

ICO TO ERROR IF RAO 

4500 

*3*022 

104000 



HET 



4521 

*30024 

122777 

000020 

151200 

CMPB 

#20,PSRE 

ICOMPARE SR WITH 2 

45?2 

*30030 

001401 



REQ 

.*4 

ISKJP ERROR IF GOQ0 

4503 

*30034 

104000 



WET 


I HALT ON ERROR (LEFT SHIFT } 

45*4 

4525 

4506 

*30036 

104400 



SCOPE 







,S§TTe test 

KE11*A (pDp-U/20) 

RIGHT SHIFT 


c 


4508 

*30040 

012777 

000000 

151156 


MQV 

#0,*MQ 

1 1 0 AO MQ WTtW 0 

4509 

*300*6 

012777 

177777 

151152 


MQV 

#*i , pac 

IEOAD AC WITH ,1 

4510 

*30054 

012777 

000020 

151162 


MQV 

P16, , PASH 

IEOAD SHIFT COUNT (ASH) WJTH 

4511 

*30062 

022777 

100000 

151136 


CMP 

#100000, ®AC 

1 COMPARE AC WITH 100*00 

4512 

*30070 

001401 




BED 

,♦4 

JSKIP ERROR IF GOOD 

4513 

*30072 

104000 




WET 


1 HALT on error 

4514 

*30074 

022777 

000000 

151122 


CMP 

#0, ®MQ 

ICOMPARE MQ WITH 0 

4515 

*30102 

001401 




PEO 

,*4 

ISKJP ERROR IF GOOD 

4516 

*3*1*4 

104000 




WET 


JHALT on error 

4517 

*30106 

122777 

000110 

151116 


CMPB 

ma.psRE 

ICOMPARE SR WITH 10 

4518 

*30114 

0014*1 




BEG 

,+4 

JSKIP ERROR IF GOOD 

4519 

*30116 

104000 




WET 


1 H ALT ON ERROR (RIGHT SHIFT) 

4520 

*30120 

104400 




SCOPE 



4521 









4522 





•SBTTU 

TEST 

KE11«A (pDP*ll/20) 

NORMALIZE 

4523 









4524 

*301*2 

012777 

125252 

151074 


MQV 

#125252 i ®M q 

JLOAO MQ WITH 125292 

4525 

*30130 

012777 

170000 

151070 


MOV 

#170*00, «AC 

IEOAD AC WITH 17*000 

4526 

*30136 

*05077 

151076 



CEB 

PNOR 

1 start normalize 

4527 

*30142 

022777 

100005 

151056 


CMP 

#100005 ,®AC 

ICOMPARE AC WITH 100*05 

4528 

*301*0 

001401 




RED 

, +4 

ISKJP ERROR IF GOOD 

4529 

*30152 

1.04000 




wet 


1 HALT on error 

4530 

*30154 

022777 

052520 

151042 


CMP 

#52520, ®mq 

ICOMPARE MO WITH 52520 

4531 

*30162 

001401 




BED 

i *4 

JSKIP ERROR IF GOOD 

4532 

*30164 

104000 




MET 


JHALT ON ERROR 

4533 

*30166 

122777 

000003 

151034 


CMPB 

#3,®SC 

ICOMPARE SC WITH 3 

4534 

*30174 

001401 




BED 

,64 

ISKJP ERROR IF GOOD 

4535 

*30176 

104000 




WET 


IHALT on ERROR (NORMALIZE) 

4536 

*30200 

104400 




SCOPE 



4537 









4538 





, SBTTt 

TEST 

KEU9A <PPP*il /20| 

MULTIPLY AND DIVIDE BACK To PAC K 

4539 









#540 

*30202 

012777 

052525 

151014 


MOV 

#5?5?5,®mq 


4541 

*30210 

012777 

040000 

151016 


MQV 

#400*0 , ®W]jE 


4542 

*30216 

012777 

040000 

151012 


MOV 

#400*0, SO JV 


4543 

*30224 

012777 

040000 

151002 


MQV 

#400*0, ®M^ 



GENERAL, TEST PROGRAM MACYUU24 24#QCTi73 20)20 PAGE 89 

OHOGAC'.PU t EST KEU»A (PDP.U/201 MULTIPLY AND DIVIDE RACK T° PACK 


mj? 


4544 

*3*232 

*12777 

040000 

150776 


MQV 

#400*0, PDIV 


4545 

*3*2*0 

*12777 

040000 

150766 


MQV 

#400*0, PMUL 


4546 

*3*2*6 

*12777 

040000 

150762 


MQV 

#40000, ®D JV 


4547 

*3*294 

*12777 

040000 

150752 


MQV 

#40000, ®MUE 


4348 

*3*262 

*12777 

040000 

150746 


MQV 

#40000, ®DJV 


4549 

*3*270 

*12777 

040000 

150736 


MOV 

#40000 , ® M UE 


4550 

*3*276 

*12777 

040000 

150732 


MQV 

#400r0,®DlV 


4551 

*3*3*4 

*22777 

052525 

150712 


CMP 

#52525, ®mq 


4552 

*3*312 

*014*1 




BED 

. *4 


4553 

*3*314 

1040*0 




WLT 



<1554 

*3*316 

*05777 

150704 



TST 

PAC 


4555 

*3*322 

*014*1 




BED 

, *4 


4556 

*3*324 

1040*0 




WLT 



4557 

*3*326 

122777 

000022 

150676 


CMPB 

#22 , ®SRE 

ICHECK PS 21 

4558 

*3*334 

*014*1 




BEQ 

,*4 


4959 

*3*336 

1040*0 




WLT 



4560 

*3*3#0 

1044*0 




SCOPE 



4361 

*3*3 4 2 




EN0EAE 1 




4562 









4563 





.SSTTl 

TEST 

M792YA PAPER TapE BOQTSRTAP LOADER 

4564 









4565 

*3*3*2 

*32767 

010000 

150476 

M792VAI 

BIT 

#100*0, SR2 

i 1 F SR2 BIT 12 si, DO NOT 

4566 

*3*390 

*01041 




BNE 

M792MB 

ITEST M792YA 

4567 









4568 






ITEST 

OF M792YA 


4569 









4570 

*3*392 

*050*0 




CEP 

R0 

1 SET UP TO GENERATE CHECKSUM 

4571 

*3*354 

*050*1 




CEB 

R1 


4572 

*3*396 

*127*2 

173000 



MOV 

#173000, R2 

IFIRST WORD OF M*92Y& 

4573 








JEOCATED AT 773000 

4574 

*3*362 

*622*0 



M792A1I 

ADD 

(R2)+,R0 

1 GENERATE CHECKSUM 

4575 

*3*364 

*055*1 




ADC 

R1 


4376 

*3*366 

*227*2 

173100 



CMP 

#173100, R2 

1 1 r not END OF BOOT 

4577 

**3*372 

*01373 




BNE 

M792A1 

jcontinue 

4578 

*3*374 

022737 

010712 

173014 


CMP 

#10712,®#173014 

12 VERSIONS 

4579 

*3*4*2 

*01010 




8NE 

M792A3 


4550 

*3*4*4 

*20027 

067715 



CMP 

R0, #67715 


4591 

*3*410 

*010*3 




PNC 

M792A2 

ichecksum Incorrect 

4392 

*3*412 

*20127 

000010 



CMP 

Rl,#10 


4583 

*3*416 

001.415 




BED 

M792A5 

ICHECK SUM CORRECT 

4584 

*3*420 

1040*0 



M792A2I 

WET 


JERROR IN M792YA 

4585 

*3*422 

00*413 




PR 

M 7 9 2 A 5 

1 SCOPE 

4586 

*3*424 

*22737 

005012 

173014 

M792A3I 

CMP 

#9gi2 1 ®#1730i 4 

1 IS IT OTHER VERSION 

4587 

*3*432 

*010*6 




BNE 

M792A4 

JNOT M792YA 

4588 

*3*434 

*20027 

172735 



CMP 

R0 ,#172735 

ichecksum Low order 

4589 

*3*440 

*010*3 




BNE 

M792A4 


4590 

*3*442 

*2*127 

000010 



. CMP 

Ri,#i0 


4591 

*3*446 

*014*1 




BED 

M 7 9 2 A 5 


4592 

*3*450 

1040*0 



M792A4I 

WET 


ICHECKSUM ERROR, OR 

4593 








JDEVICE IS NOT M792Y A 

4594 

*3*492 

1044*0 



M792A5I 

SCOPE 



4595 









4596 





.SBTTL 

TEST 

M792Y9, mRUDB BULK 

bootstrap loaders 


4597 




GENERAL- 

TEST program 

MACYll',624 24*gCT;73 2$|20 

PAGE 99 


DZQGAC'.Pll 

TEST M792YB, MRUOB BULK 

, BOOTSTRAP LOADERS 


4598 

$30454 

03 2767 

020000 

150364 

M792VB \ 

BIT 

#20090, SR2 

1 IE SR2 BIT 13«1 , 00 NOT 

4599 

$30462 

001053 




BNE 

endbqot 

ITEST M792YB, MRil. DR 

4600 

$30464 

022737 

010702 

173100 


CMP 

#10792, P#l73l0$ 

IIS DEVICE MR11*0B 

4601 

$30472 

001426 




BEO 

MR11DB 


4602 

$30474 

022737 

013701 

173190 


CMP 

#13701, *#17310$ 

IIS DEVICE M792YR 

4603 

$30502 

001017 




PNE 

M792B2 


4604 

$30504 

005000 




CIR 

R0 

1 SET UP TO GENERATE CHECKSUM 

4605 

$30506 

005001 




CLR 

R1 


4606 

$30510 

012702 

173100 



MOV 

#173100, «2 

IF1RST WORD OF M792YB 

4607 








ILOCATED AT 773190 

46?8 

$30514 

062200 



M7928 11 

ADD 

(R2)*,R0 

1 GENERATE CHECKSUM 

4609 

$30516 

005501 




ADC 

Rl 


4610 

$30520 

022702 

173160 



CMP 

#173160, R2 


4611 

$30524 

001373 




BNE 

M792B1 


4612 

$30526 

020027 

171631 



CMP 

R0, #171631 

ITEST LOW ORDER CHECKSUM 

4613 

$30532 

$01003 




BNE 

M792B2 


4614 

$30534 

020127 

300006 



CMP 

Rl,#6 

ITEST HIGH ORDER CHECKSUM 

4615 

$30540 

001401 




REG 

M792B3 


4616 

$30542 

104030 



M792B2I 

hlt 


ICHECKSUM ERROR 

4617 

$30544 

104400 



M792B3I 

SCOPE 



4618 

$30546 

00P421 




PR 

endboot 


4619 

$30550 

$05000 



MRilOBl 

CLR 

R0 

1 SET UP TO GENERATE CHECKSUM 

4620 

$30552 

005001 




CLR 

Rl 


4621 

$30554 

012702 

173100 



MOV 

#173100, R2 

IFIRST WORD OF MRli-DB 

4622 








ILOCATED AT 773100 

4623 

$30560 

062200 



MRilDll 

ADD 

(«2}*,R0 

1 GENERATE CHECKSUM 

4624 

$30562 

005501 




ADC 

Rl 


4625 

$30564 

£22702 

173200 



CMP 

#173200, R2 


4626 

$30570 

001373 




PNC 

MRUDl 


4627 

$30572 

020027 

H5056 



CMP 

R0, #115056 

ITEST LOW ORDER CHECKSUM 

4628 

$30576 

001003 




PNE 

MR11P2 


4629 

$30600 

0201?7 

900007 



CMP 

Rl,#7 

ITEST HIGH ORDER CHECKSUM 

4630 

$30604 

901401 




PEG 

MRHD3 


4631 

$30606 

104090 



MRUR2I 

wlt 


ICHECKSUM ERROR 

4632 

$30610 

104400 



MRU03I 

SCOPE 



4633 

$30612 




EN5BOOT1 



4634 









4635 





1 S8TTL 

UDCwll 

control test 


4636 









4637 






INTERRUPT ON L^ v EL 4 AND 

6 alternately 

4638 









4639 

$30612 

032767 

004000 

150224 

yocui 

bit 

#4000, SRl 

IIF SRl BltlUl, Do NOT 

’ 4640 

$30620 

001114 




BNE 

DRUB 

ITEST UDCli 

4641 

$30622 

$12767 

900300 

147406 


MQV 

#300,0065 

ISERVICE FIRST INTERRUPT AT LEVEL 

4642 

$30630 

005077 

150624 



CLR 

®UDCR 

1 CLEAR control REGISTER 

4643 

$30634 

005077 

150622 



CL* 

pUosr 

JCLEAR scan register 

4644 

$30640 

005067 

900204 



CLR 

uuflg 

1 CLEAR SOFTWARE DONE FLAG 

4645 

$30644 

905067 

002026 



CL R 

WATCUD 

JCLEAR UDCll DEFERRED 

4646 








1 INTERRUPT OCCURED FLAG 

4647 

930650 

905067 

902006 



CLP 

WATCUI 

JCLEAR UDCil IMMEDIATE 

4648 








J INTERRUPT OCCURED FLAG 

4649 

$30654 

104400 




SCORE 



4650 

$30656 

005777 

150600 



tst 

®udsr 

JGENERATE RIF 

4651 

$30662 

$03240 




NQP 


JWAIT FOR CLEAR DONE 


GENERAL 

TEST PROGRAM 

MACYU',624 24*0CT*73 

20120 p A5E 9l 


(JZSGAC , PTi 

UDCell 

control ' 

test 





4652 

$39664 

952777 

.000025 

150566 


SJS 

#25,PU0CR 

1 SET IMMEDIATE INTERRUPT ENABLE 

4653 








1 IMMEDIATE SCAN ENABLE 

4654 








JGENERATE RIF 

4655 

$30672 

952777 

000400 

150560 


PIS 

# 400 , PUDCR 

1 SET MAINTENANCE MODE 

4656 

$30790 

$05767 

0001*4 



TST 

UOFLG 

1 WAX T FOR INTERRUPT 

4657 

$30704 

190375 




PPL 

1 *4 


4658 

$30706 

905067 

000136 



CLR 

UDFLG 

JCLEAR SOFTWARE DONE FLAG 

4659 

$30712 

$12767 

000200 

147316 

IMMII 

MQV 

#200,236 

ISERVICE NEXT INTERRUPT AT LEVEL 

4660 

$30720 

022777 

100201 

150532 


CMR 

#100201,*UDCR 

IIS I MM DONE, ERROR, *PlF SET 

4661 

$30726 

001401 




PEG* 

,** 


4662 

$30730 

104000 




HLT 


1 ERROR 

4663 

$30732 

905777 

150524 



tst 

tgosp 

JGENERATE RIF 

4664 

$30736 

9002*0 




MQP 


JWAIT FOR CLR DONE 

4665 

$30740 

012767 

900001 

001714 


MQV 

#1, WATCUI 

1 SET UDCll IMMEDIATE 

4666 








interrupt occured flag 

4667 

$307*6 

052777 

000013 

150504 


BIS 

#13, PUQC R 

1 SET DEFFERED INTERRUPT ENABLE 

4668 








IDEFERED SCAN ENABLE 

4669 

$30754 

952777 

000400 

150476 


BIS 

#400, PUDCR 

1 SET MAINTENANCE MODE 

4670 

$307*2 

005767 

000062 



TST 

uqflg 

iwait for Interrupt 

4671 

$30766 

100375 




BPL 

,•4 


4672 

$39770 

$05067 

000054 



CLR 

UDFLG 

JCLEAR SOFTWARE DONE FLAG 

4673 

$30774 

012767 

000300 

147234 

0EFI 1 

MOV 

#300,236 

ISERVICE NEXT INTERRUPT AT LEVEL 

4674 

$31002 

022777 

1000*1 

150450 


CMP 

#100041, PUDCR 

IIS DEF DONE, ERRQR+R IF SET 

4675 

$31010 

901401 




PEG 

.** 


4676 

*31012 

104000 




HLT 


1 ERROR 

4677 

$31014 

912767 

000001 

001654 


MOV 

#1,WATCUD 

JSET UDC DEFERRED 

4678 








I INTERRUPT OCCURED FLAG 

4679 

$31022 

104490 




SCOPE 



4680 

$31024 

900412 




BR 

DRUB 


4681 









4682 






JENTER 

HERE ON UDCll INTERRUPT 

4683 









4684 

$31026 

905167 

000016 


uo I NT 1 

Cqm 

UPFi 0 

I S^T SOFTWARE DonE FrAG 

4685 

$31032 

042777 

000036 

150420 


Pic 

#36, PUDCR 

IDISABLE CONTROL 

4686 

$310*0 

942777 

000400 

150412 


BIC 

#400,frUDCR 

1 REMOVE INTERRUPT 

4687 

$310*6 

000092 




R T I 



4688 

$31050 

900000 



UDFLG I 

0 



4689 









4690 





,sbttl 

TEST QF 

DRUB In mMntenance 

mode: 

4691 









4692 

$31052 

032767 

0000*0 

147766 

ORilBI 

BIT 

#40 1 Sr2 


4693 

$31060 

001035 




BNE 

drenoa 


4694 

$31062 

905067 

000100 



CLP 

DRFLG 


4695 

$31066 

104400 




SCOPE 



4696 

$310 7 0 

012777 

177760 

150360 


MQV 

#f20,PDRWc 

120 WORD XFER 

4697 

$31076 

012777 

931170 

150350 


MQV 

#DRBUF , POrBa 


4698 

$31104 

012777 

177777 

150336 


MQV 

#wi 1 ^DRDBR 


4699 

$31112 

912777 

010101 

150332 


MQV 

#010101, PD«ST 

IMAJNT, IE AND GO 

4790 

$31120 

905767 

0000*2 



TST 

DRFLG 


4701 

$31124 

001775 




BEG 

,*4 


4702 

$31126 

905067 

000034 



CLP 

DRFLG 


4733 

$31132 

012701 

031170 



MQV 

#0RBUF,R1 


4734 

$31136 

022121 




CMP 

(Rl)*, CR1)+ 

IFIRST AND SECOND WORD 

4735 

$311*0 

901776 




PEG 

, *2 

1 SHOULD BE EQUAL 



GENERAL test program M AC Yll*. 624 24*0CT*73 2*120 P AGE 92 

DlQCAC’i Pll TEST OP DRUB |n MAINTENANCE MODE 


4706 

*3U42 

020127 

031230 



CMP 

R1,#ORENO 

4707 

*31146 

101001 




PHI 

1 *4 

47*8 

*311*0 

104080 




HLT 


4709 

*3H?2 

104400 




SCOPE 


4710 

*31194 

00*167 

000050 


ORENOAI 

UMP 

DNU 

4711 







4712 





(Enter 

HERE ON DRU*B INTERRUPT 

4713 








4714 

4715 

*311*0 

*31164 

005267 

000082 

000002 


DRlRI 

INC 

«TI 

DRF^G 

4716 

*31166 

*00000 



drFlgi 

0 


4717 

*31170 




DR0UFI 



4718 

*31170 

"00000 




M 


4719 

*31172 

000000 




M 


4720 

*31174 

000080 




• N 


4721 

*31176 

000000 




■ N 


4722 


"31200 




N*', 


4723 

*31200 

"31200 




N 


4724 

*31202 

031280 




N 


4725 

*312*4 

146680 




■N 


4726 

.#31806 

146680 




■ N 


4727 


831210 




N«', 


4728 

*31210 

031210 




N 


4729 

*31212 

*31210 




N 


4730 

*31214 

146570 




*N 


4731 

*31216 

146570 




■ N 


4732 


*31220 




N 8 , 


4733 

*31220 

031220 




N 


4734 

*31222 

031220 




M 


4735 

*31224 

146560 




*N 


4736 

*31226 

146560 




■ N 


4737 


03123 0 




Nr, 


4738 

*31230 




DREND I 



4739 








4740 

4741 

4742 





1 SBTTL 

TEST OF 

DNU IN MAINTENANCE 

*31230 

*32767 

002000 

147610 

0N1U 

BIT 

«2000,SR2 

4743 

*31236 

001074 




RNE 

ONEND 

4744 

*31240 

012777 

831432 

150066 


MOV 

*unisr,»dnvec 

4745 

*312*6 

012777 

000200 

150062 


MQV 

#200,g»DNLVL 

4746 

*31294 

052767 

000200 

146514 


PIS 

A200.PS 

4747 

*31262 

005067 

000166 



CLP 

DNFLG 

4748 

*31266 

104400 




SCOPE 


4749 

*31270 

812777 

000515 

150034 


MQV 

#5>15 , PDNCSR 

4750 







4751 








4752 








4753 

*31276 

042767 

0003*0 

146472 


BIC 

#340, PS 

4754 

*31304 

005767 

0001*4 



TST 

DNFLG 

4755 

*31310 

1003*5 




PPL 

, **4 

4756 

*31312 

805067 

000136 



CLR 

DNFLG 

4757 

*31316 

012777 

001115 

150006 


MQV 

#U15,®DNCSR 


4758 

4759 


I BAD QRUB DATA 


I SOURCE IS TRANSFERRED TO 
I DEST I NAT I ON 


I SOURCE' IS TRANSFERRED TO 
(DESTINATION 


(SOURCE IS TRANSFERRED TO 
I DEST I NAT I ON 


(SOURCE IS TRANSFERRED TO 
(DESTINATION 


I IE SR2 BIT10P1, Do mOT 
(TEST DNU DIGITAL DIALER 
(SET UP DNU INTERRUPT VECTOR 
(SET UP INTERRUPT SERVICE LEVEL 
J S|T PROCESSOR T® PRtORjTY 4 
(CLEAR SOFTWARE DONE FLAG 

(SET CALL REQUEST, MASTER 
(ENABLE, MAINTENANCE MODE 
(INTERRUPT ENABLE. 

J FORCE PRESENT NFXT DIGIT 
(ALLOW INTERRUPT® 

iwait for Interrupt 

(CLEAR SOFTWARE DONE FLAG 
(SET CALL REQUEST, MASTER 
(ENABLE, MAINTENANCE MODE, 
(INTERRUPT ENABLE 


GENERAL test PROGRAM 
D 2 Q G A C P U TEST 


4760 

4761 

4762 

4763 

4764 

4765 

4766 

4767 

4768 

4769 

4770 

4771 

4772 

4773 

4774 

4775 

4776 

4777 

4778 

4779 

4780 

4781 
4 782 

4783 

4784 

4785 


**31324 

*31332 

*31336 

*31340 

*31344 


*31352 

*31360 

*31366 

*31372 

*31374 

*31"400 


*314*6 

*31414 

*31420 

*31422 

*31426 

*31430 


042767 

005767 

100375 

005067 

*12777 


*52777 
04276 7 
005767 
100375 
*05067 

*12777 


*42767 

*05767 

100375 

005067 

104400 

000412 


MACYU’,624 24«0CT; 

73 28120 

p AGE 93 


DNU IN 

MAINTENANCE 

MODE 







(FORCE DATA SET STATUS 

000340 

146444 

BIC 

#340,PS 

(ALLOC INTERRUPTS 

000116 


TST 

DNFLG 

(WAIT FOR INTERRUPT 



8PL 

, *4 


000110 


CL r 

DNFLG 

(CLEAR SOFTWARE DONE FLAG 

800115 

147760 

MOV 

U15,#0NCS* 

(SET CALL REQUEST, MASTER 





(ENABLE, MAINTENANCE MODE 





(INTERRUPT ENABLE 

002000 

147752 

BIS 

#2000,PQNCSR 

(FORCE POWER OFF 

000340 

146410 

BIC 

#340,pS 

(ENABLE INTERRUPTS 

000062 


TST 

DNFLG 

(WAIT FOR interrupt 



PPL 

1 *4 


000054 


clr 

DNFLG 

(CLEAR SOFTWARE DONE FLAG 

004U5 

147724 

MQV 

#4115,SBDNCSR 

(SET CALL REQUEST, MASTER 





(ENABLE, MAINTENANCE MODE 





(INTERRUPT ENABLE 





(FORCE ABANDON CALL AND RETRY 

000340 

146362 

BIC 

*340, PS 

JALLOW INTERRUPTS 

003034 


TST 

DNFLG 

(WAIT FOR INTERRUPT 



PPL 

• *4 


000026 


CLR 

DNFLG 

(CLEAR SOFTWARE DONE FLAG 


DNENP1 


SCOPE 
BR 


DHACT 


ienter mere on dmu interrupt 


4786 

*31432 

105777 

147674 

ONI SR ( 

TSTB 

®DnCSr 

4787 

*31436 

100481 



PM I 

,+4 

4788 

*31440 

104080 



W L T 


4789 

*31442 

005077 

147664 


CLR 

«PNCSR 

4790 

*31446 

8051 6 7 

000002 


COM 

DNFLG 

4791 

*31452 

000002 



RTI 


4792 

*31494 

008080 


ONFLGI 

? 


4793 







4794 




, SBTTL 

TEST OF 

DRU*A,C If 

4795 







4796 




I NOTE 1 

MAINTENANCE CABLE ? 

4797 







4798 

*31456 

032767 

000004 147364 

ORACTI 

BIT 

*4,SR3 

4799 

*314*4 

"01101 



BNE 

KGSTRT 

4800 

*31466 

005067 

147344 


CLR 

I COUNT 

4801 

*31472 

005077 

147430 


CLP 

GPRACCS 

48?2 

*31476 

005001 



CLP 

R1 

4803 

*31580 

104480 



SCOPE 


4804 

*31502 

810177 

147422 

DRACT1 j 

MQV 

Rl.PDRACOB 

4885 

*31586 

820177 

147416 


CMP 

Rl.&PRACOB 

4806 

*31512 

001481 



BED 

,44 

4807 

*31514 

104080 



M LT 


4888 

*31516 

820177 

147410 


CMP 

R1,#DRACIB 

4809 

*31522 

001481 



BEQ 

,44 

4510 

*31524 

104080 



HLT 


48U 

*31526 

*05281 



INC 

R1 

4612 

*31530 

801364 



BNE 

DKACT1 

4813 

*31532 

104480 



SCOPE 



(test for done 

(DONE NOT SET, ERROR 
(CLEAR CONTROL REGISTER 
(SET SOFTWARE DONE FLAG 


(IF SR3 BIT 2U. Do NOT 

(TEST DRilwA , DRlliC GENERAL REGISTER 

(CLEAR ITERATION COUNT 

(CLEAR CONTROL REGISTER 

(CLEAR TEST DATA 

(MOV DATA TO OUTPUT PUFFER 
(CHECK DATA 


(CHECK RECEIVED DATA 


(UPDATE TRANSMIT DATA 
(CONTINUE IF NOT 0 



GENERAL TEST PROGRAM m a cYU,6?4 ?4*.QCT;73 20|20 

DiOGAC'i Pll TEST OF ORU*A|C IN MAINTENANCE mqoE 
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*814, 

■ 031534 

012777 

031664 

147372 


MQV 

#DR ACT 1 1 '“DR I VEC 

1 set up input interrupt vector 

4815 

0315*2 

012777 

000240 

1473*6 


MOV 

#240, PDRIL^L 


4816 

*315*0 

012777 

031666 

1473*2 


MOV 

#DRACTO,*D«OVEe 

J SET UP OUTPUT INTERRUPT VECTOR 

4817 

0315*6 

012777 

000240 

1473*6 


MOV 

#240 , POROlVl 


4818 

0315*4 

104400 




SCOPE 



4619 

*315*6 

0127*7 

004000 

147242 


MQV 

#4000, ICOUNT 


4820 

031574 

005002 




CL* 

R2 


4821 

031576 

005077 

147326 



CUR 

0URACOB 

1 CLEAR CONTROL REGISTER 

4822 

*31602 

005077 

147320 



CLR 

(ODRACCS 

1 CLEAR CONTROL REGISTER 

4823 

031606 

0527*7 

000240 

146162 


R JS 

#240 1 PS 

1 LOCK OUT ORtl*A,C INTERRUPTS 

4824 

031614 

012777 

000003 

147304 


MOV 

#3,{tDRACCS 

1 SET MAINTENANCE BITS FOR 

4825 








JDRll*e INTERRUPT GENERATION 

4826 

031622 

012777 

100200 

147300 


MOV 

#100200 , PDRACOR 

1 SET MAINTENANCE BITS FOR 

4827 








I DR11* A INTERRUPT GENERATION 

4828 

031630 

052777 

000140 

147270 


njs 

#140,»DRACCS 

1 SET INTERRUPT ENABLES 

4829 

031636 

0427*7 

0002«0 

146132 


BjC 

#240, PS 

1 ALLOW INTERRUPTS 

4830 

*316*4 

005777 

1472*6 



TST 

®DRACCS 

j w a 1 t for input interrupt 

4831 

0316*0 

100375 




B?l 

i *4 


4832 

*316*2 

105777 

1472*0 



TSTB 

S'URACCS 

I W A I T FOR OUTPUT INTERRUPT 

4833 

*316*6 

100375 




PPL 

• *4 


4834 

*316*0 

104400 




SCOPE 



4835 

0316*2 

O00402 




PR 

KGSTRT 


4636 

*316*4 

000002 



DR ACT 1 1 

RTI 



4837 

4638 

0316*6 

000002 



ORACTOI 

RT1 



4839 





,SBTTL 

TEST KGU»A CYCi IC REDUNDANCY 

CHECK OPTION 

4840 









4841 





J TEST THE RESULTS OF CRCI61 CClTfi AnD 

CRC12 BY COMPARING 

4842 





1 known 

RESULTS 

AGAINST HARDWARE GENERATED DATA 

4843 

4844 

031670 

0327*7 

000001 

147152 

KGsTRTI 

PIT 

#1,SP3 

IIP SR3 BIT S9*l . Do nQT 

4845 

*31676 

*01042 




RNE 

KGEND 

I TEST KG11A 

4.8 4 6 

*31700 

104400 




SCOPE 



4847 

031702 

n?7«i 

032010 


KGfESTl 

MOV 

#KGIP,R1 

| INSTRUCTION TO RE EYECUTEO 

4648 

*31706 

n?7?2 

032016 



MOV 

#KGDP,H2 

JTABLE of DATA 

4849 

*31712 

0127 24 

0320*6 



MOV 

#KGC p 1 R4 

1 TABLE or RESULTS 

4850 

*31716 

*12777 

000020 

147540 

KGtAI 

MOV 

#20,®KGCSR 

ICLEAR BCC REGISTER 

4651 

031724 

011177 

147534 



MOV 

I«l) ,0KGCSR 

J SET UP CSR FROM INSTRUCTION TABLE 

4852 

031730 

011277 

147634 



MOV 

<R2) ,»KGD8R 

ISENO DATA to DEVICE 

4853 








jstart bcc computation 

48*4 

*31734 

105777 

147524 



TSTB 

»kgcsr 

I W A 1 T FOR DONE 

4855 

*317*0 

001775 




BED 

1 *4 

IPROGRAM WILL HANG IF DONE NEVER SETS 

4856 

0317*2 

*177*7 

147520 

0036*4 


MQV 

pKGBCCi TEMP 

iread results of bcc 

4857 

0317*0 

0214*7 

0036*0 



CMP 

( R4 ) , TEMP 

JC0MPARE EXPECTED and RECEIVED RESULTS 

4658 

*317*4 

001401 




PEG 

i+4 


4859 

*317*6 

104000 




WL.T 


1 BCC INCORRECT, error 

4860 

0317*0 

022224 




CMP 

<H2)*, {R4>* 

iadvance data and result pointers 

4861 

*317*2 

020227 

0320*6 



CMP 

R2,#KCCP 

iend of OATa 

4362 

*317*6 

0013*3 




RNE 

WGTA 

1 NO * CONTINUE 

4863 

*31770 

012702 

032016 



MQV 

#KGDP,R2 

J RESET DATA POINTER 

4864 

*31774 

0221*7 

000014 



CMP 

<Rl)*,KGCl2 

jaovance instruction pointer 

4865 

032000 

001346 




PNE 

KGT A 


4866 

*32002 

104400 




SCOPE 



4867 

032004 

0001*7 

000206 


kgendi 

JMP 

OMliBB 



eneral 

T£ST PROGRAM MACYll.624 

?4,0CT„73 

20 I 20 PAGE 95 


ZQGac'.PU 

TEST K G 1 j. « A CYCLtC 

REDUNDANCY 

CHECK OPTION 


4868 

732010 

700111 

KG ! P 1 

000111 


4869 

732012 

703115 

KGCITI 

000115 


4870 

732014 

000130 

KGC12 J 

00 P 100 


4871 






4872 




1 D AT A TABLE F 0 r CrC TESTS 

4873 






4874 

732016 

300431 

kgdpi 

000401 


4875 

732020 

177376 


177376 


4876 

73?0?2 

"01032 


001002 


4677 

732024 

176775 


176775 


4878 

732026 

7020? 4 


002004 


4879 

732030 

175773 


1,75773 


4880 

*32032 

304010 


304010 


4881 

732034 

1737*7 


173767 


4882 

732036 

710020 


010020 


4 883 

732040 

1677*7 


167757 


4884 

732042 

020040 


020040 


4885 

. 732044 

157737 


157737 


4686 

732046 

040100 


040100 


4887 

7320*0 

137677 


137677 


4888 

**320*2 

100270 


100200 


4889 

7320*4 

377577 


077577 


4860 






4891 




IRESULT TABLE FqR 

CRC1* 

4892 






4893 

7320*6 

0503P0 

KGfipi 

050300 


4894 

*32060 

160301 


160301 


4895 

7320*2 

120600 


120600 


4396 

*320*4 

010631 


010601 


4997 

732066 

301403 


001403 


4898 

732070 

131402 


131402 


4699 

732072 

303006 


003006 


4900 

732074 

133007 


133007 


4901 

732076 

30*014 


006014 


49?2 

732100 

13*015 


136015 


4903 

732172 

.314030 


014030 


4904 

732174 

124031 


124031 


4905 

732106 

33^0*0 


0300*0 


4906 

73?U0 

1000*1 


100061 


4907 

732112 

360140 


060140 


4908 

”*32114 

150141 


150141 


4909 






4910 




IRESULT TABLE FqR 

CCITY 

4911 






4912 

’32116 

004121 


004121 


4913 

732120 

1743*1 


174351 


4914 

732122 

0102 4 2 


010242 


4915 

732124 

160032 


160032 


4916 

732126 

320504 


020504 


4917 

732130 

150774 

150774 



4918 

732132 

041210 


041210 


4919 

732134 

1310*0 

131060 



49?0 

732136 

102420 


102420 


49?1 

732140 

0726*0 

072650 




JCRC16 INSTRUCTION W0RO 
JCCITT INSTRUCTION WORD 
ICRC12 INSTRUCTION WORD 



6CNERAU 

TEST PROGRAM 

MACYU’,624 24t 

QCU73 i 

2*120 *»AOE 96 

* M 

D if 0 G A C *» 1 

3 U 

TEST KG1UA CYCLIC REDUNDANCY CHECK OPTION 


4922 

*321*2 

001061 



001061 




4923 

*3?1M 

1*1211 



man 




4924 

*3?1«6 

*02142 




002142 



4925 

0321*0 

172332 



1*2332 




4926 

*32152 

004304 



004304 




4927 

5132154 

1741*4 



174174 




4928 









49?9 





I result 

TABLE FqR CRC12 

I 

4930 

*32156 

024051 




024051 


f / 

4931 

*32160 

030061 



030061 




4932 

*321*2 

*24421 



024421 




4933 

*321*4 

0304U 



030411 




4934 

*321*6 

025041 



025041 




4935 

*321*0 

0310*1 



0 3 i 0 7 1 




4936 

*32172 

024401 



026401 




4937 

*321*4 

032431 



032431 




4938 

*3?1*6 

021001 



021001 




4939 

*322*0 

035031 



035031 




4940 

*3?2*2 

036001 



036001 




4941 

*32204 

022031 



022031 




4942 

*32206 

000000 



000000 




4943 

*32210 

*14030 



014030 




4944 

*32212 

7-00000 



000000 




4945 

*32214 

014030 



014030 




4946 









4947 





« SBTTL 

Qmii*bb 

modem control test 


4948 









4949 






IDm11»BB MODEM CONTROL MULTIPLEXER 

4950 






ISCANNER LOGIC TEST 


4951 






1 INPUT 

l'S INTO all SCANNER 

MEMORY LOCATIONS 

4952 






IVERIFY 

THAT AN INTERRUPT OCCURS FOR EACH LINE 

4953 









4954 


004000 



CLRSCn«4*00 



4955 


*02000 



CLRMUXi2000 



4956 


001000 



MAI NT ■1000 



4957 


000400 



STEP«400 



4958 


0001*0 



INTENAP100 



4999 


000040 



SCNENAI40 



4960 


000200 



CONE*200 



4961 


000020 



BUSY-20 




4962 

*32216 

032767 

000010 

146624 

DMllBBI 

BJT 

#10,SR3 

1 I F SR3 BIT 3il , DO NOT 

4963 

*32224 

001100 




BNE 

dmbend 

ITEST OMllsBB 

4964 

*32226 

1044*0 




SCOPE 



4965 

*32230 

0127*7 

006000 

1472*4 

5CNT1I 

MOV 

#CIRMUX*ClWSCN.9DMBC$R 

4966 

*32236 

0327*7 

000020 

147266 


PIT 

*BU$Y,RDMBCSR 

1 CLEAR ALL MULTIPLEXER FLIPFLOPS 

4967 

*32244 

0013*4 




RNE 

i*6 


4968 

*32246 

*12700 

000020 



MQV 

#16,,R0 

1 SET UP TO WRITE 1*S INTO 

4969 

*32252 

005077 

147254 



CL* 

RDMBCSP 

1 ALL LINE ENABLE FLIPFLOPS 

4970 

*322*6 

*127*7 

000001 

147250 

scntiai 

MQV 

n,PWLSR 

1 SET FLIPFLOP 

4971 

*322*4 

0527*7 

000400 

147240 


BJS 

#STEP,RO M BCS» 

IGO TO NEXT LINE 

4972 

*3?2*2 

005300 




DEC 

R0 


4973 

*322*4 

0013*0 




BNP 

SCNT1A 


4974 

*32276 

0127*7 

032410 

147232 


MQV 

#DMB ! NT , *D m BVEC 

1 SET UP LOCAL INTERRUPT SERVICE 

4975 

*323*4 

012705 

171340 



MQV 

#171340, R5 

jT~\ 

general 

TEST PROGRAM 

MACYll', 

624 24?j 

qct;73 ; 

2*120 PAGE 97 

(:"■ : 

v. * 

DZOGAC'.Pil 


MODEM CONTHOU TEST 




4976 

*32310 

012777 

000200 

14*222 


MQV 

#200,?OM0L V L 

1 SERVICE at LEVEL 4 

4977 

*32316 

012700 

000020 



MOV 

#16. |R0 


4978 

*3?322 

0127*7 

001117 

147202 


MOV 

#MAlNT+INTENA+i7.RDMBCSRlSET INTERRUPT ENA8LF AND MAINTENANCE MODE 

4979 

*32330 

05276? 

000200 

145440 

SCNT1BI 

BIS 

#200, PS 

1 INHIBIT INTERRUPTS 

4950 

*32336 

0527*7 

000040 

14*166 


BIS 

#SCNENA,*DMBCSR 

J.START SCANNER 

4981 

*32344 

042767 

000200 

145424 


B I C 

#200, PS 


4982 

*323*2 

1057*7 

14*154 



TSTB 

»UMBCSR 


4983 

*323*6 

100375 




BPL 

• * 4 


4984 

*323 60 

0205*7 

14*146 



CMP 

R5.0DMBCSR 


4985 

*32364 

001401 




BED 

SCNT1D 


4986 

*323*6 

104000 




HIT 


ISCANNER LOGIC ERROR 

4987 

*32370 

0427*7 

000240 

147134 

SCNTlDl 

BIC 

#scnena*oonc 1 pp>mbcsr 

1 CLEAR SCAN ENABLE AND DONE 

4988 

*323*6 

0.05205 




INC 

R5 

IUPOATE EXPECTED RESULT 

4989 

*32400 

005300 




DEC 

R0 

icontinue If not done 

4990 

*32402 

001352 




RNE 

SCNT1B 


4991 

*32404 

104400 



SCNTlEl 

SCOPE 


ICHECK FOR ITERATIONS, LOOP 

4992 

*32406 

000407 




BR 

dmbend 


4993 









4994 






I enter 

HERE ON DM11 .BP InTEpRUPT 

4995 









4996 

*32410 

105777 

147116 


DmbInTI 


TSTB PDMBCSR 

IIS DONE BIT SET 

4997 

*32414 

100001 




bpl 

,*4 


4998 

*32416 

000002 




RT! 


1 YES | RETURN 

4999 

*32420 

104000 




W LT 


J INTERRUPT WITH DONE NOT SET 

5000 

*32422 

022626 




CMP 

(SP)*, (SP)* 

iadjust stack 

5001 

*32424 

000767 




BR 

SCNT1E 

IRESTART AFTER ERROR 

5002 

*32426 




OMBENDI 




5003 









5004 





.sbttl 

DEVICE 

WATCHDOGS 


5005 









5006 






IVERIFY 

SELECTED DEVICES ARE 

running 

5007 









5008 

*32426 

005067 

146404 


WAfCMI 

C L R 

I Count 


5009 

*32432 

032767 

004000 

3 45130 


BIT 

#4000 , SR 

1 I F ITERATIONS ARE INHIBITED 

5010 

*32440 

0014*2 




BED 

,+6 

IDO NOT CHECK WATCHDOGS 

5011 

*32442 

000167 

000450 



JMP 

ENOWATCH 


5012 

*32446 

016701 

146372 



MQV 

SRl.Rl 


5013 

*324*2 

0167*2 

146370 



MQV 

SH2.R2 


5014 

*324*6 

032731 

000020 



PIT 

#20, Pi 

1 1 F KW11-L WAS NOT SELECTED 

5015 

*3?462 

*01006 




BNE 

WATl 

IDO NOT CHECK WATCHDOG 

5016 

*3?464 

005767 

000006 



TST 

WATCKL 

JOID KWH *L INTERRUPT 

5017 

*32470 

*010*1 




BNE 

,+4 


5018 

*324*2 

104000 




mlt 


J NO INTERRUPT THIS PASS, ERROR 

5019 

*324*4 

005027 




CLP 

(PC>* 

1 CLEAR INTERRUPT OCCURED FLAG 

5020 

*32476 

000000 



WAfCKLl 

C 


JKWltH INTERRUPT OCCURED FLAG M \ 

5021 

*32500 

032767 

000100 

146336 

WAfll 

BIT 

#100, SRI 

1 I F KWUtP WAS NOT SELECTED ■ £ 

5022 

*32506 

0010*6 




BNE 

WAT2 

IDO NOT CHECK WATCHDOG / 

5023 

*32510 

*05767 

000006 



TST 

WATCKP 


5024 

*32514 

*010*1 




BNE 



5025 

*32516 

1040*0 




HIT 



5026 

*32520 

*05027 




CLP 

(PC)* 


5027 

*32522 

000030 



WAfCKP! 

0 



5028 

*32524 

0327*1 

000400 


WAT 2 1 

BIT 

#400, R1 

JIF BUS TESTER SECTIONS 1 AND 2 

5029 

*32530 

001014 




BNE 

WAT3 

JWERE NOT SELECTED 



general 

test program 

M ACYll,624 

watchdogs 

24-0CU73 2*120 

PAGE 95 


DZOGAC', 

PU 

DEVICE 



5030 






IDO NOT CHECK WATCOOG 

5031 

*»3?5>32 

*05767 

000006 

TST 

WATCAB 

1 DID BUS TESTER SECTION 1 INTERRUPT 

5032 

*32536 

0010*1 


BNE 

,*4 


5033 

*3?540 

104000 


hut 


ino interrupt this pass, error 

5034 

*32542 

*05027 


cub 

(PC)* 

1 CUE AR INTERRUPT OCCURED FLAG 

5035 

*32544 

*0*000 


WAfCABi 0 


1 BUS TESTER SECTION l 

5036 






1 INTERRUPT OCCURED FLAG 

5037 

*3?546 

*05767 

000006 

TST 

UATCBB 

1 DSD BUS TESTER SECTION 2 INTERRUPT 

5038 

*32552 

*010*1 


BNE 

.*4 


5039 

*32554 

1040*0 


hut 


ino interrupt this pass, error 

5040 

*32556 

*05027 


CUB 

(PC)* 

1 clear interrupt occured flag 

5041 

*325*0 

*00000 


WATCBBI 0 


1 BUS TESTER SECTION ? 

5042 






1 INTERRUPT OCCURED FLAG 

5043 

*325*2 

*327*1 

001000 

WAf3» BJT 

#1000, R1 

1 IF BUS TESTER SECTIONS 3 AND 4 

5044 






1 WERE NOT SELECTED 

5045 

*32566 

001014 


BNE 

WAT4 

I QO NOT CHECK WATCHDOG 

5046 

*32570 

*05767 

000006 

TST 

WATCCB 

IDID BUS TESTER SECTION 3 INTERRUPT 

5047 

*132574 

*010*1 


BNE 

i*4 


5048 

*32576 

1040*0 


HUT 


ino interrupt this pass, error 

504 9 

*32630 

*05027 


CUR 

(PC)* 

J CUE AR INTERRUPT OCCUREO FLAG 

5350 

*326*2 

*000*0 


WATCCBJ 0 


1 BUS TESTER SECTION 3 

5251 






1 interrupt occured flag 

5052 

*326*4 

005767 

000006 

TST 

WATCPB 

1 DID BUS TESTER SECTION 4 INTERRUPT 

5053 

*32610 

*01001 


BNE 

, *4 


5054 

*32612 

104000 


HUT 


ino interrupt this pass, error 

5055 

*3261.4 

*05027 


CUB 

(PC)* 

1 CLEAR INTERRUPT OCCUREO FLAG 

5356 

*32616 

*0*0*0 


WAfCDBt B 


1 BUS TESTER SECTION 4 

5057 






1 interrupt occured flag 

5058 

*32620 

*32701 

002000 

WAT4I BIT 

#2000 , R1 

1 if RF11 WAS NOT SELECTED 

5059 

*32624 

*01006 


BNE 

WATS 

1 DO NOT CHECK WATCHDOG 

5060 

*32626 

*05767 

000006 

TST 

WATCPF 

idid rf 11 interrupt 

5261 

*32632 

0010*1 


BNE 

, *4 


5062 

*32634 

104000 


HUT 


ino interrupt this pass, error 

5063 

*32636 

*05027 


CUB 

(PC)* 

I CLEAR INTERRUPT GCCljRED FLAG 

5064 

*32640 

*000*0 


WAfCRFl * 


IRFU INTERRUPT OCCURED flag 

5065 

*326*2 

*327*1 

004000 

ul At5 1 BIT 

#4000, R1 

1 I F UDCli WAS NOT SELECTED 

5066 

*3?646 

*01014 


BNE 

WAT6 

1 DO NOT CHECK WAtCMOOG 

5067 

*32650 

*05767 

000006 

TST 

WATCUI 

IDID IMMEDIATE INTERRUPT OCCUR 

5068 

*32664 

*010*1 


BNE 

.*4 


5069 

*32656 

1040*0 


BUT 


INO INTERRUPT THIS PaSS, ERROR 

5070 

*32660 

*05027 


cu p 

(PC)* 

1 CLEAR INTERRUPT OCCURED FLAG 

5071 

*326*2 

*0*0*0 


WAfCUll ? 


IUOCU IMMEDIATE INTERRUPT 

5272 

*32664 

*05767 

000006 

TST 

WATCUD 

IDID DEFERED INTERRUPT OCCUR 

5073 

*3*670 

*010*1 


BNE 

, *4 


5274 

*32672 

1040*0 


HUT 


INO INTERRUPT THIS PASS, ERROR 

5275 

*32674 

*05027 


CUP 

(PC)* 

1 CLEAR INTERRUPT OCCURED FLAG 

5076 

*32676 

00*0*0 


WAf CUD 1 * 


IUDC11 DEFERED INTERRUPT 

5077 

*327*0 

* 327*1 

010000 

WAT6I BIT 

#10000, R1 

1 IF RCU WAS NOT SELECTED 

5078 

*32704 

*010*6 


BNE 

WAT7 

IDO NOT CHECK WATCHDOG 

5079 

*3*706 

*05767 

*00006 

TST 

watcrc 

idid rcii Interrupt 

5050 

*32712 

*010*1 


BNE 

, *4 


5061 

*32714 

1040*0 


HUT 


INO INTERRUPT THIS PASS, ERROR 

5062 

*32716 

*05027 


CUP 

(PC)* 

1 CLEAR INTERRUPT OCCURED FLAG 

5053 

*3*720 

0000*0 


WATCPCI 0 


1 RCll INTERRUPT CCCUPED FLAG 


GENERAL 

test program 

MACYll',624 

watchdogs 

24»0pT173 

27(20 

PAGE 99 


DZOGAC'.PU 

DEVICE 



5084 

732722 

032702 

000001 

WAf 7 1 

BIT 

n,R2 

1 1 F DC11 #1 WAS MOT SELECTED 

5085 

732726 

*01006 



BNE 

WAT8 

IDO NOT CHECK WATCHDOG 

5086 

*32730 

005767 

000006 


TST 

WATDC1 

(DID DCU #1 INTERRUPT 

5087 

*32734 

*010*1 



BNE 

, +4 


508 8 

*32736 

1040*0 



hlt 


INO INTERRUPT THIS PASS, ERROR 

5089 

*32740 

*05027 



CLP 

(PC)* 

1 CLEAR INTERRUPT OCCURED FLAG 

5090 

732742 

000000 


WAfDCll 

0 


JDC11 #1 INTERRUPT OCCURED FLAG 

5091 

732744 

*327*2 

000002 

WAf 81 

BIT 

#2,R2 

1 I F DC11 #2 WAS MOT SELECTED 

5092 

732750 

*01006 



BNE 

W A T 9 

IDO NOT CHECK WATCHDOG 

5093 

*32752 

005767 

000006 


TST 

WATDC2 

IDID DCU #1 INTERRUPT 

5094 

732766 

*010*1 



BNE 

, +4 

5095 

732760 

1040*0 



«LT 


ino interrupt this pass, error 

509 6 

732762 

*05027 


WATDC2I 

CLP 

(PC)* 

1 CLEAR INTERRUPT OCCURED FLAG 

5097 

732764 

*00000 


7 


IDCU #2 INTERRUPT OCCURED FLAG 

5098 

732766 

■0327D2 

000010 

WAT 9 | 

BIT 

#10,R2 

1 1 F AFCU WAS Not SELECTED 

5099 

732772 

001006 



BNE 

W ATI? 

IDO NOT CHECK WATCHDOG 

5100 

732774 

706767 

700006 


TST 

WATCAF 

IDID AFCU INTERRUPT 

5101 

7330*0 

7010*1 



BNE 

, *4 

51*2 

7330*2 

104000 



MIT 


ino interrupt this pass, error 

51*3 

7330*4 

705027 



CLP 

(PC)* 

ICLEAR INTERRUPT OCCURED FLAG 

5104 

7330*6 

*00070 


WATCAF j 

7 


IAFCU INTERRUPT OCCURED FLAG 

51*5 

733010 

7327*2 

000020 

WAf 10 | 

BJT 

#20, P2 

1 IF RKU WAS NOT SELECTED 

5106 

*33014 

0010*6 



BNE 

W A T 1 2 

IDO NOT CHECK WATCHDOG 

51*7 

733016 

705767 

000006 


TST 

W A T C R K 

IDID RKU INTERRUPT 

5108 

733022 

701071 



BNE 

.♦4 

51*9 

733024 

104070 



hlt 


INO INTERRUPT THIS PASS, ERROR 

5110 

*33026 

705027 



clr 

(PC)* 

ICLEAR INTERRUPT OCCURED FLAG 

5111 

*33030 

700000 


WAfCRKl 

0 


JRKU INTERRUPT OCCUPEO FLAG 

5112 

733032 

*32772 

700200 

WAf 12 : 

BIT 

#200,R2 

1 I F AD 01 WAS NOT SELECTED 

5113 

*33036 

001006 



BNE 

WAT13 

JDO NOT CHECK WATCHDOG 

5114 

733040 

*05767 

000006 


TST 

WATCAD 

IDID AD01 INTERRUPT 

5115 

733044 

701001 



BNE 

• *4 

5116 

733046 

104000 



hut 


ino interrupt this pass, error 

5117 

733050 

*05027 



CUR 

(PC)* 

ICLEAR INTERRUPT OCCURED FLAG 

5118 

733062 

700070 


WATCADI 

0 


IAO01 INTERRUPT OCCURED FLAG 

5119 

733064 

032772 

040000 

WAT13J 

BIT 

#400?0,R2 

J IF DPU WAS NOT SELECTED 

5120 

*33060 

701076 



BNE 

W A T 1 4 

IDO NOT CHECK WATCHDOG 

5121 

733062 

005767 

000006 


TST 

WATCDP 

IDID DPU INTERRUPT 

5122 

733066 

701071 



BNE 

i*4 


5123 

733070 

104070 



hlt 


ino interrupt this pass, error 

5124 

733072 

705027 


WAfCDPi 

CUR 

(PC)* 

ICLEAR INTERPUPT OCCURED FLAG 

5125 

*33074 

700070 


7 


1 D P 11 INTERRUPT OCCURED FLAG 

5126 

733076 

*05772 


WAf 14 | 

TST 

R2 

he DMii was not selected 

5127 

•7331*0 

100476 



BM! 

WAT15 

IDO NOT CHECK WATCHDOG 

5128 

*331*2 

705767 

000006 


TST 

WATCDM 

idid dmu Interrupt 

5129 

*331*6 

701001 



BNE 

, *4 


5130 

73313.0 

104070 



HUT 


ino interrupt this pass, error 

5131 

*33112 

705027 



CU R 

(PC> + 

ICLEAR INTERRUPT OCCURED FLAG ■ 

5132 

733114 

700070 


WAfCDMl 

0 


1 DMU INTERRUPT OCCURED FLAG 

5133 

•733116 



WAT 15 | 




5134 

*33116 



emdwati 





5135 

5136 ,SBTTL MEMORY EXPANSION TEST 

5137 



GENERAL t E*T Program ^ACYXi‘,6?4 24tOCTi73 20*20 B AGE 1«0 
OifOGAC'i P* 1 MEMORY EXPANSION TEST 


3138 


100 SIMPLE CORE EXPANSION To RFST OF MEMORY 


3139 

333116 

036727 

144446 

001000 


PIT 

SR, #1000 

ITEST FOR MEMORY EXPANSION 

5140 

*133124 

O01065 




RNE 

EXPANJ 

/ SHOULD BE SWITCH TERT 

3141 

733126 

012737 

000002 

001036 


M QV 

#S<i MI COUNT 


3142 

833134 

012767 

033142 

143722 


MQV 

#EXpAND|RETy*N 


5143 

833142 

026767 

143704 

143706 

EXPAND* 

CMP 

LPCORE,HCORE 

IMORE THAN 3 K W ? 

3144 

833130 

103053 




PHIS 

EXPAN3 

l,NO * DON'T EXPAND 

5145 

833132 

016701 

143674 



MQV 

LPCOREiRl 

J YES EXPAND 

3146 

833136 

012702 

033226 


E X p A N 1 1 

MQV 

#LTESTL.»2 

1 move: the code between 

5147 

733162 

012221 



EXPAN2I 

MOV 

( R 2 > * 1 ( R 5. > * 

ILTESTL and HTESTL TILL 

5148 

833164 

020227 

033300 



CMP 

R2,#wtESTl+2 

* CORE IS FULL 

5149 

833170 

001374 




RNE 

EXP AN 2 

5150 

833172 

020167 

143660 



CMP 

Ri,HCO«E 


5151 

833176 

101767 




RIOS 

expani 

J BRANCH TILL MEMORY IS FULL 

5152 

733200 

012721 

000137 



MQV 

8137 , ( Rl > + 

1 SE T UP RETURN FROM 

5153 

833204 

"12721 

033300 



MQV 

PEXPAN3, (Rl>* 

IH1GH CORE JMP *#EXPAND3 

5154 

* 3 3 2 1 0 

104400 




SCOPE 


5155 

733212 

012737 

004000 

001036 


MQV 

«4000,»#lCOgNT 


3156 

833220 

000177 

143626 



JMP 

•UOCORE 


5157 

833224 

131486 



ROtVALl 

151456 




5158 

5159 
51*0 


ITrtlS tS THE TEST THAT WluU EXP*N^D 
UN TO THE REST OP MEMORY 


5161 


000000 




MERE *0 



5162 









5163 

833226 

000277 



LTESTLl 

see 


*SET CARRY BIT 

5164 

833230 

012727 

123456 

000000 

MOV 

P123456 I #HERE 

*HERE CONTAINS VALUE 

5165 

833236 

106067 

177773 


LTE3T1* 

RQRB 

LYESTIi.1 

*HERF IS ROTATED 

5166 

833242 

103401 




BCS 

.*8 


5167 

833244 

104000 




wlt 


*C BIT WAS NOT SET 

5168 

833246 

102001 




BVC 

,*4 


5169 

033250 

104000 




HIT 



5170 

833282 

022767 

151456 

177754 


CMP 

#15l456 l LTESTi;2 

1 CHECK HERE FOR CORRECT ROTATE BYTE 

5171 

033260 

001401 




REQ 

,*4 


5172 

033262 

104000 




HIT 


# ROTATE FAILED 

5173 

033264 

023767 

033224 

177742 


CMP 

MR0TVAL,LTE9Tr»« 

5174 

033272 

001401 




RED 

.♦A 


5175 

033274 

104000 




HIT 


J REF 1 TO LOW MEMORY FAILED 

5176 

033276 

104400 



HTESTL 1 

SCOPE 


5177 









5178 

5179 

5180 

033300 




EXPAN3I 



jextended memory returns here after being 

033300 

012767 

004000 

145530 


MQV 

#4000 , 1 COUNT 


5181 





.sbttl 

BACKGROUND overlay call 


5182 









5183 

833306 

016767 

144464 

144506 


MOV 

PS.IOTLVL 

iservice OVERLAY at current .PROCESSOR 

5184 







jstatus and mode 

5185 

833314 

016767 

144500 

145542 


MOV 

IPTVEC, RETURN 

iset up NEW SCOPE POINTER . 


3186 

5187 

5188 

3189 

3190 

3191 


*133322 000004 


i the next instruction is the c*u' to a user background overlay 

I THE USER MUST SET UP THE I Of VECTOR TO GET TO HIS PROGRAM 
TOT 


GENERAL' TEST PROGRAM MACUl',624 24 «pOCT;73 20*20 PAGE 101 

B2QGAC # ,P11 ASTERISK ON PASS COMPLETE 

5192 i SBTTL ASTERISK ON PASS COMPLETE 

5193 


5194 

033324 

004767 

001332 


BELLI 

USR 

PC.HSPLSP 

/DETERMINE if OUTPUT TO tty hr hf!p 

5195 

833330 

"32777 

000100 

001400 


BIT 

#100,»TCSR 

1 I F OUTPUT DEVICE IS RUNNING 

5196 

033336 

"01025 




BNE 

ENDPAS 

1 DO NOT SEND BELL 

5197 

833340 

105777 

001372 



TSTB 

«tcsr 

JWAIT FOR FLAG* MAKE SURE NOT BUSY 

5198 

033344 

100375 




BPL 

,®4 


9199 

033346 

012777 

000215 

001360 


MOV 

#215,HTDBR 

JOUTPUT CR 

5200 

033354 

105777 

001396 



TSTB 

$tcsr 


5201 

033360 

100375 




BPL 

, **4 


5202 

033362 

012777 

000212 

001344 


MOV 

#212# 5>TQBR 

IOUTPUT if 

5203 

033370 

105777 

001342 



TSTB 

aTCSR 


5204 

033374 

100375 




BPL 

1 *4 


5205 

033376 

012777 

000092 

001330 


MQV 

#1 *,®TD0R 

IOUTPUT ASTERISK COOP 

5206 

033404 

105777 

001326 



TSTB 

pTCSR 

f WAIT FOR DONE 

5207 

033410 

100375 




BPL 

,«4 


5208 









5209 





,S§TTL 

EnO of 

PASS 


5210 









52U 






1 END OP PASS SERVICE 


5212 






ICHECK 

FOR EXIT TO EXTERNAL 

MONITOR 

5213 






J CHECK 

FOR BUS SWjTcu RELEAS 

r 

5214 






J CHECK 

FOR ISOLATION 


5215 






ICHECK 

FOR PROCESSOR MODF CHANGE 

5216 






ICHECK 

FOR USE OF KTfl 


5217 









5218 

033412 

016767 

144360 

002204 

EnDPASI 

MQV 

PS.TEmP 

JSAVE CURRENT PROCESSOR STATUS 

5219 

833420 

3105067 

144392 



CLR 

PS 

J CLEAR PS {EXCEPT TRaCE BIT) 

5220 

033424 

132767 

000010 

1*9431 


BITS 

#10,CONFIG*1 

J I f segmentation is available 

5221 

033432 

001402 




BEO 

,+6 

/ TURN IT OFF 

5222 

833434 

005067 

144130 



CLR 

SSR0 


5223 

033440 

013701 

0000*2 



MOV 

*#42#R! 

jget contents of loc 4? 

5224 

033444 

801426 




8EQ 

ENDP1 

/BRANCH IF not QUICK VERIFY OR AUTO ACOE p T 

5225 

033446 

105767 

145415 



TSTB 

OVFLG 

/IS THIS AUTO ACCEPT? 

5226 

833492 

001423 




BED 

endpi 

jyes* BRANCH JCONT I F ov 

5227 

033454 

000005 



exit 1 

RESET 



5228 

033496 

012767 

000137 

144514 


MOV 

#137,200 

{RESTORE 200 

5229 

833464 

012767 

0015*2 

144510 


MOV 

#BEG!N1.202 

/AND 202 

5230 

033472 

012706 

036322 



MOV 

pstackk.sp 

/RESTORE STACK 

5231 

033476 

005046 




CL« 

«(SP) 

/SET UP TO CLEAR T PIT 

5232 

033500 

012746 

033506 



MQV 

#LOGICALis(SP> 

/BY RTI, GO TO LOGICAL 

5233 

033504 

000002 




RTI 



5234 

033506 

0047H 



LOGICAL * JSR 

PCiCRl) 

/RETURN TO MONITOR 

5235 

033510 

000240 




NQP 


/FOR ACTll 

5236 

033512 

0002«0 




NOP 



5237 

033514 

000240 




NQP 



5238 

033516 

000137 

000200 



JMP 

8#200 

JDDP RETURN TO START 

5239 

833522 

005767 

001762 


ENfiPU 

TST 

ISFL5 

/IF ISOLATION IS SFLFCTEP 

5240 

833526 

001403 




BEQ 

ENDP2 


5241 

033530 

104000 




HLT 


/type status of system 

5242 

833532 

004767 

001562 



JSR 

PC.ISOLAT 

J ISOLATE NEXT DEVICE 

5243 

833536 

005267 

000566 


EN0P2* 

INC 

PASCT 


5244 

833542 

005267 

145274 



INC 

PASCNT 

UNCREMENT PASS COUNT 

5245 

033546 

016767 

145270 

14401* 


MQV 

PASCNT, LIGHTS 

>DIS P LAY PASS COUNT 


xrcuT 
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PASS 






5246 

*33554 

#12706 

*36322 



MOV 

#STACKK,SP 

(SET EXEC STACK POINTER 

5247 

*33560 

n 0 5 0 4 6 




n L P 

•ISP) 

(PRESET 'NEw' STATUS’. 

5248 

*33562 

?105767 

144254 



TST 

42 

( I F 42*0, HIGH SPEED DUMP 

5249 

*33566 

m 1407 




BEG 

ENDPAX 


5250 

*33570 

*26767 

000534 

000530 


CMP 

pasct, rase* 

1 I F AUTO ACCEPT OR OOP CHAIN MODE, 

5251 

*33576 

001003 




BNE 

ENDPAX 

fBPA‘ ! CH IF NOT AIL Moors HAVF BEEN TFSTEO 

5252 

*33600 

005067 

000524 



CLP 

PASCT 

(ALL MODES NAVE nEEN RUN- GO TO THE 

5253 

533604 

00J5723 




fiR 

EXIT 

(MONITOR RFTURN 

5254 

#33606 

032767 

010000 

143754 

ENDPAX J 

PIT 

#10000, SR 

1 FREEZE IN CURRENT MODE? 

5255 

733614 

*01403 




PEO 

ENOPA1 

(NO- BRANCH 

5256 

#33616 

016716 

002002 



M 0V 

TEMP, (SP> 

J YES* S£T UP TO RESTART WITH 

5257 

#33622 

’000424 




PR 

dtrel 

( CURRENT STATUS 

5258 

#33624 

*16700 

700500 


ENDPA1I 

MQV 

PASCT.R0 


5259 

#33630 

020067 

000472 



CMP 

R0,PASEX 


5260 

#33634 

002403 




»LT 

IS 


5261 

*33636 

005067 

000466 



CLR 

PASCT 


5262 

*33642 

*05000 




CIR 

R0 


5263 

*33644 

*06300 



Hi 

ASl 

R0 

jcalcOuate oefset 

5264 

*33646 

066770 

000452 



ADO 

paspar,r* 

j get table starting address 

5265 

*33662 

711016 




M o v 

(H0) , (SP) 

(LOAD PARAMETERS IN 'NEW' STATUS 

5266 

*336^4 

726727 

145162 

*0*0*2 


CMP 

PASCNT,#2 

j I f less than 2 passes complfte 

5267 

*33662 

103404 




Pin 

OTREL 

(DON'T allow KTli 

5268 

*33664 

*32767 

000040 

145156 


PIT 

#40,SR3 

IKUl INHIBITED? 

5269 

*33672 

001450 




REG 

SEGOPT 

1 NO- GO TURN ON IF Av-AILABLE 

5270 

*33674 

032767 

000002 

145142 

DTREL 1 

PIT 

#2,SRl 

» C M E 0 K FOR MULTIPROCESSORS 

5271 

*33702 

7-0U- 37 




RNE 

NOOPT 

JBRA/’CH around ip SET 

5272 

*33704 

7 00005 




RESET 


J RELEASE SWITCH 

5273 

*33706 

*05027 

*33710 



CUR 

#BUSWT 

JALLOW OTHER PROCESSOR TO REQUEST SWITCH 

5274 


733710 





BUSWTa',-2 


5275 

#33712 

005367 

177772 



DEC 

PUSWT 


5276 

*33716 

*01375 




PNF 

, *4 


5277 

*33720 

*32777 

020000 

145252 


PIT 

#20000, ®OTCS91 

(MONITOR NON-NEUTRAL BIT 

5278 

*33726 

*01374 




RNE 

1 **6 

(WAIT FOP IT TO C L E A ^ 

5279 

*33730 

0127*7 

000001 

145242 


MOV 

#l,POTCSRl 

(REQUEST SWITCH 

52*0 

*33736 

105777 

145236 



TSTB 

3DTCSR1 

(WAIT FOR IT TO CONNECT 

5291 

*33742 

10*375 




BPU 

« *4 


5292 

*33744 

705067 

001654 



CLP 

TEMP 

(DELAY FOR DEVICES 

5293 

*33760 

*09267 

*01650 



T NC 

TEMP 

(TO INITIALISE 

5294 

*33764 

*01375 




BNE 

,-4 


5295 

*33756 

052777 

001000 

1,45214 


PIS 

#1000,®DTcSR1 

) ISSUE SWITCHED bus ’NIT 

5286 

*33764 

*32777 

001000 

1452*6 


a I T 

#1000,!»dtcsri 

(WAIT FOR I NIT TO Fir ISH 

5287 

*33772 

*01374 




RNE 

, *6 


5288 

*33774 

*12746 

002452 



MOV 

#STA,9<SP) 

(SWITCH is CONNECTED - RESTART Program 

5289 

*34000 

*00472 




«R 

EXOPT 


5290 

*34002 

712746 

014606 


NOOPTJ 

MQV 

#PROCTS, - ( Sp ) 

(RESTART 

5291 

*34006 

000002 



EXOPT 1 

RTI 


(PROGRAM 

5292 









5293 

*39010 

000002 



TRTRETl 

RTI 


(RETURN TO PROGRAM FROM TRAP 

5294 

#3*012 

000000 




halt 


(RTI FAILED 

5295 









5296 


*00014 




TRTVEC= 

14 

(TRACE TRAP VECTOR 

5297 









5298 





1 Kf 11 OPTION 



5299 

*34014 

132767 

00*010 

145041 

SEGOPTl 

P I TB 

#10,CONFIG+1 

(CHECK IF AVAILABLE 


general 

TEST PROGRAM 

MACYir, 

624 24- 

■ QCT173 

20(20 PAGE 103 


OZQGAC'.Pi’l 

END OF 

PASS 






5300 

*34022 

001724 




PEQ 

DTREL 

(RETURN IF NOT AVAILABLE 

5301 

*34024 

005067 

143542 



CLP 

SSR0 

(DISABLE IF ON 

5302 

*34030 

#327*7 

000.001 

149024 


BIT 

#1, CONFIG 

J IF PROCESSOR IS POP-11/40 

5303 

*34036 

801423 




RED 

SEG48 

(MAP FOR 11/40 

5304 

*34040 

O04567 

000136 



JSR 

R5.MAP 

(MAP FOR POP -11/ 45 

53*5 

*34044 

000006 




6 



5306 

#3*046 

177640 




UISAR0 



5307 

*34050 

177660 




UDSAR0 



5308 

*34052 

172240 




S 1 SAR0 



5309 

*34054 

172260 




SDSAR0 



5310 

*34056 

172340 




K JSAR0 



5311 

*34060 

172360 




KDSAR0 



5312 

*34062 

004567 

000150 



USP 

R9 , M.AP A 


5313 

*340*6 

000006 




6 



5314 

*34070 

177600 




U I S D R 0 



5315 

*34072 

177620 




UDSDR0 



53i6 

*34074 

172200 




SISOR0 



5317 

*34076 

172220 




SDSDR0 



5318 

*34100 

172300 




k I S D R 0 



5319 

#341*2 

172320 




KDSOR0 



5320 

*341*4 

000412 




RR 

segall 


5321 

*341*6 

004567 

000070 


SEG401 

JSR 

R5 , M AP 

(MAP FOR 11/40 

5322 

*34112 

000002 




2 



5323 

*34114 

1776«0 




U JSAR0 



5324 

*34116 

172340 




KJSAR0 



5325 

#3«120 

004567 

000112 



JSR 

R5 , M APA 


9326 

*34124 

000002 




2 



5327 

*34126 

177600 




UISDR0 



5328 

*341*0 

172300 




K1SDF0 



9329 

*34132 

012767 

034152 

144H0 

SEGALLi 

MOV 

#segerr,segvfc 

J LOAD KTll ERROR VECTOR 

5330 

*34140 

005067 

144106 



CLR 

SEGVFC+2 


5331 

*34144 

005267 

143422 



INC 

SSR0 

(ENABLE KTll 

5332 

*34150 

000691 




RR 

DTREL 

(RETURN 

5333 









5334 





IKTPli ERROR 



5335 

*34152 

#16767 

143414 

000020 

SEGEFRI 

MQV 

SSR0 , SSR0T 

J SAVE SSR0 INDICATORS 

5336 

#341*0 

012767 

000007 

136330 


MOV 

Ul , SSR3 

(ENABLE D SPACES 

5337 

*34166 

012767 

000001 

143376 


MQV 

#1 1 SSR0 

(CLEAR FLAGS 

5338 

#34174 

000167 

144092 



JMP 

SEGLVL 

(GO HALT 

5339 

*34200 

#00000 



SSR0TI 

0 


1 KTll ERROR FLAGS ARE SAVED HERE 

5340 









5341 





IKtll REGISTER 

addresses 


5342 


177572 




SSR0»177972 


5343 


172516 




SSR3=172516 


5344 


177600 




UISQR0S177600 


5345 


177620 




UDSDR0»177620 


5346 


177640 




UIS4R0S177640 


6347 


177660 




UDSAF0! 

*177660 


5348 


172200 




SISDF0U72200 


5349 


172220 




SDSDR0! 

'172220 


5350 


172240 




SISAF0S172240 


5351 


172260 




SDSAR0S172260 


5352 


172300 




KISDR0S172300 


5353 


172320 




KDSDF0S17232# 




? o: tr tr or 

O O O O Ui LiJ Li 

c tr. m to in c.\ c< c 

J — — — oo C 
>>>>172 
i tr tr tr or 

- Ui LL: k 72 0 

3 o. a o. a ujuj l 

J3DDDKK1/ 

ttnwmwDD: 


t + tc< NS ^ < 

■» ^ h — a: tr -cm tvi in 

• zr t 9 a. - a - - w «a.a. to 
s <■« — dl k < & < -t-*a f. < < ■« 

- a: s «-ac r sx • »r x a. 

i • s • • -« - inin.- n « • 

: KWat W»HNNU\ XXS NrlAI A XV 

'«e « acK »irx — — * =* tr tr tr •>* 


tvi tvs tv 

unvNmNmxmxxatt 

t 2 2 2 < 2 < - <t • «<£ 

» > > • *— <k- 

(<<UKW5Kttn:U(l2i 


»<<<t> 2 U)Etto: t_> cl tr »-# tr n ct n c tvi n <r 

N 2) in !fl a O. ao.3 2 < W) 2 20. 2 a 2 22 2 2 

^ « « «> «> •(-> -in -in mm - > >» > 

N N » » < U < U UI un 

■ *.CEa:xtfia.mo.o:a?iV5a.®Q.eo.etLWos5n 


■ >a > >otB> > >> >inec«> 0 

>o-io oaoooft- aoo ooo»- a_ 

7 U 7 I 4 K ZHK 7 7 7 ZL U) in BC — 


K E S its 
CM CM vt st 

CO CT tr tr 

< < < < 

; cu a. a. a. tv tv «* > 


—> >- c. *-*o c ►- c »>»ct is- _» > »- _i >- > :>:>>£r:>a:>ec:>tr>tr>(r>f7:>tr>:>:> 

xi-!/)uii-z««ui2000i/iwis.oinaoooooMOMO(flOD(no[/)Oi/)0(nooo 

r >- ffiX ►'■n: E 2 tr 7 7 7 T>- E7. >- C7 7. 7 7 7 “>7 T7 ->7 cn ->n 7 *>7 "J7 7 7 

o o 


cm cm cm cm cm a« NiMOosMstcMs^ss s m <s 

rfNSIO S «rt M2 rt* ♦ W » <t *0 W ♦ N N N S <1 

»sOSN« CM CM CM CM CM CM CM CM CM CM O CM ift wt tM 5 

S G S S S Ki Si GGKSSKGB'CG'OKK* 

G S G K» N SS ISR2KlK>ISSISI9«-SfOSi3C 

Gi G S G K S>, G GBSSGSSSr(BGGS( 


r -O T S^NSO 

. « o <n av n jo tvs 

tSrfartrtrtrt 


NSri»«- snnsvn mow son a 

Si Si S> & S NSSN WS SSS NSS S 

inintvOlv nMrlNNN iftlAN r^i-ICMCM 

(VI CM tvs trv or SSNNt< S CV 1 CM CM CM *■* **- 19 

rt^rlSHI rM>KrlNO HttH irtNNO 

Rffi SBR SGSSSG SEE S S S K 


S 9 BSSOS 5 kSOiSS 
G N S (VI SftlS tVl 59 JVl S N 
SiSiSSSGlQGISSQa 
SEVflMSEvl- v BE vrvt 

<r <r<r 

BBGEi B. K (S> *£ »+ Ti <r« •rl 


IS SB OSONCVIV vr 

S3: s; tvj tv- «-?. <c bs jbj s w-f 

QQSOfOiONBaaS 
(St G -vt -M -M 4SSSB 
59 5S2 JO JO JO JO 59 59 K» S» 

Si?: K. 5. G 55 G. E. E5 K G 


KHNNNNWNNKNKN ANN ANNNKNNNNNIMMtMNtMNN^ NN CM W <t 

t)SK<)«NSh«««eMVNNM'e<l«&«!SOS«S&i*S«E<iSt!SSB 

N^StVSJvvr’t O 0« N JvfONMONCM W Vt rvtvNNNNNMtvNrvNJv fsNN NN 
IT, rdEilf'AMCrlGBX'O'tlf'BtvrBlVlBBB'O^OvrOvttViOMJO'tR^ JO V « <C « 
aaBatfOaaWrtrlSSarlSaHr»Ttr(HSWaTtBrN)SrlSr«SWarlrtH 

BS8,e:8 8BBB5iB6»<HStlHt!BKBKB'E G G K S5 ri E G G GEE G G G G 


N««N« SCM«<ON« <OSI(M ONVO 

EESf «>4 tvi tvj rv» cv no to w vr » * »s » m 

CM CM CM CM CM CM IM tM IM CM tM CM (M CM CM CM CM CM 


« CM M OSN'TOISNV'O 
C«C«|vKNNSBES 
CM CM CM CM tM CM tM CM K> JO JO K» 


Oi'JN'fflStM't-O a 

NnB'JOKxrtct* 
JO JO JO JO JO JO JO JO JO JO 


N«sfM<0't(MvrocyiO'ra'it'0'rs(viKivrNvristva'ra'ta^sita'ta'ra't« 

its it««cnege *-»*-(■ tv wEKtifnriccNhKiBrtirj tv cvjo*o«rMiriiri«<>KtvG 

JO 1 JO JO JO JO’ i(V itV itV UV 5IY if> i<\ (CV 5CV 5A tfV ifV 5fk XV 5TV £t> O 


mk\ otvoov o*mnMin<ots«a» shcmio moon ®OQritMJOvM(\>orv©o>KiHtMJOMin'OrvoosTiNiOMiA<)N 

IfUnitSIftBSIBMS'O'e'O'O'OM ’OO'Ot^Ne^MStvMS ® K KaSCeC'CtDCCCJtJaOOOiCJCJOiO'BBBBBBGB 

jojofojojotojojojojojojofojoiojojojojojo iojo sow jo joiojonjow w joroio joiojoiojo joiownojovr m 't't vj it 
in to kmokmis mmmmmmmm m m mm m m mm m mmmmmmmmmmmmmmmmm mm m mmmmmmmmm mm 


OOOQWCMM'rin'OMOCJ S H N JO M in O fv CO O' arlNn^in'OMOO>QH«tO’tin' 0 ?sOO>QrlNJOvrift't>NCOOBH 
El KrJ rl.TtrlTl TJTl W VI-»JtV CVi<VCViN tVtVNNN JCI JOKJOJC JOKS WJOr/'t V « vt « V t « « vf n iC, SCV If- UV IT. tr tfS If: ITS <2 vO 
M M M vf M- vr 't ''# M M vr M M* vt -vr VT sr M V'tMM't vr M vr vr M M- M- M M vt vr M- M- M M vt M St Mr M vJ Nt vt VJ M 

mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm 


a o 



GENERAL TEST P 9 OGHAM MACYll',624 ?4 pQCT;73 2*120 PAGE 106 

OZQGAC'.Pil ERRQR HANDLE" 


5462 

434604 

005767 

142760 


PR f NTH 

TST 

SH 

(TEST FOR HALT SWITCH 

5463 

434610 

100005 




BPl 

PRINT2 


5464 

734612 

010046 




MOV 

R0,*(SP) 

) SAVE R0 ON STACK 

5465 

734614 

016700 

000120 



MQV 

SAVPC.R0 


5466 

734620 

000000 




HALT 


1 halt on error set 

5467 

734622 

012600 




MQV 

(SP)*,R0 


5468 

734624 

032767 

000400 

142736 

PRf NT2I 

BIT 

#400, SR 


5469 

734632 

001402 




beg 

. 46 


5470 

734634 

004767 

000460 



JSR 

PC, ISOLATE 


5471 

734640 

032767 

000100 

142722 


BIT 

#100, SR 


5472 

734646 

001003 




BNE 

PRINTS 


5473 

734650 

005067 

144164 



CLR 

PRFLAC 

JCLEAR PRINT ROUTINE BUSY 

5474 

734654 

000002 




RTI 


JRETURN TO MAIN STREAM 

5475 

734656 

000137 

002352 


PRINT3I 

JMP 

P#ST 

J to restart prog 

5476 









5477 

734662 

016767 

144216 

000046 

MSPLSPI 

MQV 

TTCSP.TCSR 


5478 

734670 

016767 

144212 

000036 


MQV 

TTDBF.TDPR 


5479 

734676 

036727 

142666 

000200 


BIT 

SH, #200 


5480 

734704 

001406 




PEG 

HPLPEX 


5481 

734706 

016767 

144202 

000022 


MQV 

HPCSP, TCSR 


5482 

734714 

016767 

144176 

000012 


MOV 

NPDBR, TQBr 


5483 

734722 

000207 



HPLPEXi 

R.TS 

PC 


5484 

734724 

000000 



5AVSPAI 

0 



5485 

734726 

000000 



SAVR2I 

0 



5486 

734730 

000000 



SAVR3} 

0 



5487 

734732 

000000 



SAVR4I 

0 



5488 

••34734 

177566 



TDBRI 

177566 


(DATA 

5489 

734736 

177564 



TCSRI 

177564 


(PS 

5490 

734740 

000000 



SAVPC5 

0 



5491 

734742 

000000 



SAVPSI 

0 



5492 









5493 






(CONVERT DATA To ASCII 

AmO TYpF 

5494 









5495 

734744 

012704 

035070 


PRT AB l 

mo V 

#L I ST fjD , R4 

(SET UP POINTER TQ UaTA STORAGE 

5496 

*34750 

012767 

000006 

000074 


MOV 

# 6 , A S C N T 

(6 DIGITS WILL BE FXtrac t EO 

5497 

*34756 

010203 



PRTAP1I 

MOV 

R2.R3 

J GET DATA TO BE rONVFRTED 

5498 

*34760 

042703 

177770 



BIC 

#177770, R3 

J EXTRACT 1 OCTAL DIGIT 

5499 

734764 

062703 

000260 



ADD 

#260, R3 

J CONVERT TO ASCII 

55*0 

'*34770 

010344 




MOV 

R3,-f R4 } 

J SAVE ASCII DIGIT 

5501 

*34772 

006202 




ASR 

R2 

(POSITION NEXT DIGIT 

55?2 

734774 

006202 




ASW 

R2 

1 TO BE EXTRACTED 

5503 

*34776 

■1062^2 




ASR 

R2 


5504 

735000 

005367 

000046 



DEC 

ASCNT 

J IF ALL DIGITS HAVE ”OT BEEN 

5505 

*35004 

001364 




RNF 

phtapi 

J EXTRACTED, CONTINUE 

5506 

735006 

042714 

000006 



RIC 

#6, (R4) 


5507 

*35012 

012767 

000007 

000032 

XIIST! 

MOV 

#7, ASCNT 

J SEND 7 CHAR TO TTY 

5508 

735020 

105777 

177712 


WAITS?* 

TSTB 

©TCSR 


5509 

735024 

I 00375 




PPL 

WAIT? 


5510 

735026 

012477 

177702 



MQV 

(R4i + ,i?TDBR 


5511 

735032 

005367 

000014 



DEC 

ASCNT 


5512 

735036 

001401 




BED 

HOFHM 

J FINISH PRINTING GET NXT NUM 

5513 

735040 

000767 




PR 

WAIT? 


5514 

735042 

105777 

177670 


HDFHHJ 

TSTB STCSR 


5515 

735046 

100375 




RPL 

.-4 



general 

TEST program 

MACY11’, 

,624 ?4bQCT;73 

2*120 

PAGE 107 


dzogac; 

Pll 

ERROR 1 

HANDLER 





5516 

*35050 

000207 



RTS 

PC 

( H E A n FQP HOME 

5517 

*35052 

000000 


ASCNT { 

V 



5518 

636,354 

000000 


LIST! 

0 



5519 

*35056 

0000 0 0 



p 



5520 

735060 

000000 



« 



5521 

*35062 

000000 



fi 



5522 

*35064 

0000 0 0 



0 



5523 

*35066 

000000 



7 



5524 

*35070 

000240 


LlSTNDl 

24C 


(SEPARATOR 

5525 








5526 




j Scope 

LOOP ROUTjNE ENTERED oY U^EP 

TRAP 

5527 

*35072 

016716 

143766 

SCOPEBI 

MQV 

RETURN, (S P ) 

(SET UP FOR NEXT TfST 

5528 

*35076 

005767 

155050 

SCOPFTl 

TST 

TCFLAG 

(DFCTAPE DATA 

5529 

*351*2 

001402 



BED 

t + 6 

(BRANCH IF NO NEW DAtA 

5530 

*35l'/4 

0047 67 

000064 


JSR 

PC, TCI 

(CHECK TC DATA 

5531 







(SPECIAL SERVICE CODE 

5532 

*35110 

004767 

000130 


JSR 

PC, twait 

(CHECK INHIBIT PROCESSOR SWITCH 

5533 

*35114 

000002 



RTI 


JSCO n E RETURN 

5534 








5535 








5536 




.SBTTl 

SCOPE 

LOOP ROUTINE 


5537 








5538 

*35116 

032767 

040000 

142444 SCoPFCl 

BIT 

#40000,39 

(TEST F QR LOOP 

5539 

*35124 

001.362 



RNE ' 

SCOPEB 

(YES SCOPE 

5540 

*35126 

105767 

143735 


TSTB 

QVFLG 

J IF OVFLG NOT 0 

5541 

*35132 

001015 



BNE 

scopfa 

(NO ITERATIONS OF TEST 

5542 

*35134 

032767 

004000 

142426 

BJT 

# 400/? , SR 

(NO - test for iteration 

5543 

*35142 

001007 



BNE 

SCOPEG 

(INHIBIT ITERATION 

5544 

*35144 

026767 

143710 

143664 

CMP 

SCOPEF , I COUNT 


5545 

*35152 

001403 



BED 

SCOPEG 

(EXIT - DONE 

5546 

*35154 

005267 

143700 


INC 

SCOPEF 

(INCREMENT COUNT 

5547 

*35160 

000744 



PR 

SCOPEB 

(LOOP SOME MORE 

5548 

*35162 

005067 

143672 

SCOPEGI 

CLP 

SCOPEF 

(CLEAR COUNT 

5549 

*35166 

011667 

143672 

SCOPFAI 

MQV 

©sp.return 

(SAVE SCOPE RETURN POINTER 

5550 

*35172 

*00002 



RTI 


JRETURN I Nl I NE nNEXt TEST 

5551 








5552 




(THIS ROUTINE 

CHECKS THE REAP DATA S 

OFFER TCU 

5553 




JOY DOING A CHECK SUM ON THE DAT a 


5554 

*35174 

005067 

154752 

TCiJ 

CLP 

tcflag 

(SET BY TC READ ROUTINE 

5555 

*35200 

010146 



MQV 

Rl.-(SP) 

(SAVE THESE ON THE STACK 

5556 

*35202 

0102^6 



MQV 

R2,»<SP) 


5557 

*35204 

0103«6 



MOV 

R3,t<SP> 


5558 

*35206 

005003 



CL" 

R3 

(SUM OF DATA 

5559 

*35210 

012701 

012750 


MQV 

#tcrbuf,Ri 

(ADDRESS OF READ BUFFER 

5560 

*35214 

012702 

*13750 


MQW 

#TCRBUF4-1000 # R2 

(END OF READ BUFFER 

v 556i 

*35220 

062103 


TC2J 

ADD 

( Hi ) 4>, R3 

(EVEN ADD 

5562 

*35222 

062103 



ADD 

f«l)*,R3 

(ODD ADO COMPLIMENT 

$563 

*35224 

*01775 



BED 

TC2 


5564 

*35226 

*20102 



CMP 

R1,R2 

(AT END OF BUFFER? 

5565 

*35230 

101001 



RHI 

,+4 

(YES-BRANCH 

5566 

*35232 

104000 



WLT 


(DATA ERROR 

5567 

*35234 

012603 



MOV 

<SP)+,R3 

(RESTORE THE REGISTERS 

5568 

*35236 

H260H 



MQV 

( SP > + , R2 


5569 

*35240 

012601 



MQV 

( SP ) < 4 - , R1 




general 

TrST PROGRAM 

WACYU',624 24* 

-0CT;73 

2*120 

RAGE 1*8 


DZBGACi 

Ptl 

SCOPE LOOP ROUTINE 





5570 

$35842 

*002*7 



RTS 

PC 

JEXIT 

5571 

039244 



TWA it I 




5572 

035244 

032767 

002000 142316 


BIT 

*200* i SR 


5573 

039252 

*014*2 



REG 

ewait 


5574 

*•39294 

*000*1 



wait 


IWAIT WERE rOR INTERRUPTS 

5575 

035296 

*00772 



PR 

TWAIT 


5576 

$35260 

000207 


ewaiti 

RTS 

PC 

JE*IT wait loop 

5577 








5578 




igroup 

or nested subroutines 


5579 

$39262 

*002*7 


SUBRlAl 

RTS 

PC 

1 one instruction 

5500 

$39264 

000277 


SUBR2AI 

see 


* ONE deep 

55A1 

$39266 

*00207 



RTS 

PC 


55B2 

$39270 

004767 

177770 

SUBR3AI 

JSR 

PC.SUBR2A 

1 TWO DEEP 

55*3 

$35274 

*002*7 



RTS 

PC 


5584 

$39276 

*04767 

177766 

SUBR4AJ 

JSR 

PC.SUBR3A 

ITHREE DEEP 

5585 

$393*2 

*002*7 



RTS 

PC 


5586 

$353*4 

004767 

177766 

SUBR5AI 

JSR 

PC,SUBR4A 

irOUR DEEP 

5587 

$35310 

*0*2*7 



RTS 

PC 


5588 

$35312 

*04767 

177766 

SUBSPA 1 

JSR 

PC.SUBR5A 

jriVE DEEP 

5589 

$35316 

0002*7 



RTS 

PC 


5590 

5591 




, SBTTL 

isolation routine 



$592 

$593 

5594 

5595 

5596 
$597 
5598 


ithis routine on error detection or end or pass or 

| PROCESSOR TEST WILL DELETE ONE DEVICE OE THOSE THAT 
JHSVE BEEN SELECTED TO RUN', ON ENTER TNG THIS ROUTINE 
I THE CURRENTLY DELETED ONE WILL' RE RESTORED ANO A 
I NEW DEV I CE DELETED, 


5599 

$35320 

*32767 

*00400 

142242 

ISqLATI 

BIT 

A400,s« 

JIS isolation requested 

56*0 

$35326 

001015 



RNE 

I SOL A 1 


56*1 

$35330 

*05767 

000154 



TST 

ISFLG 

J WAS ISOLATION IN PROGRESS 

5602 

$35334 

*01411 




BED 

1 sol a 2 

nr not exit 

5603 

$35336 

*167*5 

00*144 



MOV 

ISCNT, R5 

IRESTORE LAST DELETED DEVICE 

5604 

$35342 

*46765 

000144 

001044 


BjC 

I SWRD 1 SRI ( R5 ) 


5605 

$35350 

005*67 

00*134 



CLR 

ISFLG 

J CLEAR ISOLATION FLAG 

56*6 

$35354 

*00167 

144772 



JMP 

ST 

IRESTART ALL SELECTED DEVICES 

5607 

$393*0 

*002*7 



IS0LA2I 

RTS 

PC 


5608 

$35362 

005767 

000122 


IS0LA1 1 

TST 

ISFLG 

JHAS routine been entered before 

56*9 

$35366 

*01012 




RNE 

IS02 


5610 

$39370 

*12767 

*00001 

000112 


MOV 

iiX, ISFLG 

J SET ELAG 

5611 

$35376 

*05067 

00*104 


I SOI f 

clr 

I SCNT 


5612 

$354*2 

*12767 

000004 

00*102 


MQV 

84, I SWRD 


5613 

$39410 

005005 




CLR 

R5 


5614 

$39412 

*00410 




RR 

I S04 


5615 

$39414 

*167*5 

*0*066 


IS02I 

MOV 

ISCNT.R5 

J SET UP TO ACCESS DEVICE SELECTION 

5616 

$35420 

*46765 

*00066 

001044 


RJC 

! SWRD 1 SRI ( R5 ) 

J RESTORE PREVIOUSLY DELETED OEVIOE 

5617 

$354*6 

*06367 

000060 


I S 0 3 1 

ASL 

I SWRD 

J SET UP TO DELETE NEW DEVICE. 

5618 

$35432 

*01411 




REQ 

!S05 

j IF WORD *0, RESET 

5619 

$35434 

*36765 

*00052 

001044 

IS04I 

BIT 

I SWRD 1 SRI ( H5 ) 

JIE DEVICE NOT SELECTED 

5620 

$39442 

*01371 




RNE 

IS03 

J DO NOT DESELECT 

$621 

$35444 

056765 

*00042 

001044 


BIS 

JSWRD* SRI < R5 ) 

IDESELECT DEVICE 

5622 

$35452 

*00167 

144674 



JMP 

ST 

J REST ART TEST 

5623 

$35496 

*62767 

000002 

000022 

IS05 1 

ADD 

#2, ISCNT 

j index roR next sr 


GENERAL TEST PROGRAM MACYU‘,624 24?DCT^73 2*120 RAGE 1*9 

OZQGac', PU ISOLATION ROUTINE 


9624 

$39464 

*26727 

000016 

00*0*6 


CMP 

ISCNT, #6 


jif after last sr 

9625 

$39472 

*01741 




BED 

IS01 


J REST ART SEQUENCE 

9626 

$35474 

*05267 

*00012 



INC 

I SWRD 


J SET UP TO ISOLATE 1 DEVICE 

5627 

$355*0 

0167*5 

*00002 



MQV 

ISCNT.R5 



5628 

$355*4 

*00753 




BR 

I S04 


jstart isolation 

9629 

$395*6 

*000*0 



ISCNT * 

0 




5630 

$39510 

*000*0 



ISFLG! 

* 




5631 

$39512 

0000*0 



ISWRDJ 

* 




5632 










5633 






1 ENTER i 

HERE ON POWER 

failure 


5634 










5635 










5636 

$39514 

012767 

000001 

000046 

pr ai l 1 

MOV 

#1 , pppi ag 


1 SET POWER fail Flag 

5637 

$39522 

*12767 

035532 

142274 


MQV 

PRESTART# 24 


J SET UP FOR POWER UP TRaP 

5638 

$39530 

*000*0 




WALT 



jhalt on power down normal 

5639 










5640 






JPRQCESSOK WILL TrA P 

HERF WHEN 

POWER IS RESTORED 

5641 










5642 

$39532 

*127*6 

*36520 


restari 

MQV 

PSTACk.SP 


IRESTORE STACK 

5643 

$39536 

*12767 

039514 

142260 


MOV 

#PFAIL,24 


J SET UP FOR POWER FA ILURE 

5644 

$39544 

005067 

143270 



CLR 

PRFLAG 



5645 

$39550 

*05067 

000090 



CLP 

TEMP 



5646 

$35554 

*05267 

000044 



INC 

TEMP 



5647 

$39560 

*01375 




BNE 

,«4 



5648 

$39562 

1040*0 




hlt 



IREPORT POWER FAILURE 

5649 

$35564 

*00167 

157016 



JMP 

PROCTS 


JSTART PROCESSOR TEST 

5650 

*35570 

*0*0*0 



prPLAGi 

0 




5651 

$35572 

125292 



B 1 

125252 




5652 










5653 





•SBTTl 
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5654 










5655 

$35574 

*35572 




R 



1 ADDRESS OF B 

5656 

$35576 

052525 




*52525 




5657 










5658 


0356*2 



, sB*10 





5659 

$356*2 

177777 



A! 

*1 




5660 

$356*4 

035606 




A + 4 




5661 










5662 


*356*6 



, »A + 4 





5663 

$356*6 

125292 




125252 




5664 

$35610 

*35612 




4 + 10 



JADDRESS OF A+10 

5665 

$35612 

*52525 




*52525 




5666 

$39614 

*0*0*0 



C| 

* 




5667 

$39616 

035614 




C 



jaddress of c 

5668 










5669 


*35624 



,5*6*10 





5670 

$35624 

*000*0 



TEMPI 

* 




5671 

$39626 

*35624 




TEMP 



1 ADDRESS OF TEMP 

5672 










5673 


035632 



, *f EMP+6 




5674 

$35632 

*35634 




TEMP+1* 



JADDRESS OF TEMPil* OR «C" 

5675 

$39634 

*00000 



0 1 

0 





9676 

5677 
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5786 







JTIMEOUT will OCCUR 

5787 

*36654 

112501 



MQVB 

<K5)*,R1 

1 GET OFFSET TO DEVICE SELECTION 

5788 







IREGJSTER 

5789 

*36656 

012703 

000001 


MOV 

#1,R3 

J SET UP TO SELECT DEVICE 

5790 

’>136662 

112502 



movb 

(R5J*,R2 

1 GET POSITION OF DEVICE SELECT BIT 

5791 

036664 

001403 


2*1 

REQ 

3$ 

1 WHEN BIT IS IN CORRECT POSITION 

5792 

036666 

006303 



ASE 

R3 

IPOSITION BIT 

5793 

*36670 

009302 



DEC 

R2 


5794 

*36672 

000774 



BR 

2* 


5795 

*36674 

0403*1 

001044 

3$i 

BJC 

R3,SRl(Rl) 


5796 

*36700 

005715 


4$i 

TST 

<H5) 

1 AT END OF TABLE ? 

5797 

*36702 

001363 



BNE 

1* 


5798 

*367*4 

012737 

000006 000004 


MQV 

#6,<?#4 


5799 

*36712 

005037 

000006 


clr 

9#6 


5800 

*36716 

000207 



RTS 

PC 


5801 

*36720 

005725 


5$i 

TST 

(R5>* 


5802 

*36722 

022626 



CMP 

<sp)*,<sp>* 


5803 

*36724 

0007*5 



BR 

4S 


5804 

*3*726 

001044 


STORE I 

SRI 



5805 

*36730 



DEVTABi 




5806 

*36730 

177546 


.WORD 

177546 


JKW11*L 

5807 

*36732 

000 

004 

, byte 

0,4 



5808 

*36734 

172540 


.WORD 

172540 


1 KW11 wp 

5809 

*36736 

000 

006 

.BYTE 

0,6 



5810 

*36740 

170000 


.word 

170000 


J BUS TESTER SECTION i«2 

5811 

*36742 

000 

010 

.byte 

0,8, 



5812 

*36744 

170020 


.word 

170020 


) BUS TESTER SECTION 364 

5813 

*367*6 

000 

011 

.BYTE 

0,9. 



5814 

*36750 

177460 


.WORD 

177460 


IRF11 

5815 

*36752 

000 

012 

.BYTE 

.WORD 

0,10. 



5616 

*36754 

171774 


171774 


IUDC11 

5817 

*3*756 

000 

013 

.BYTE 

0.11. 



5818 

*36760 

177440 


.WORD 

177440 


JRC11 

5619 

*36762 

000 

014 

.BYTE 

0,12, 



5820 

*36764 

177340 


.WORD 

177340 


ITCH 

5621 

*36766 

000 

015 

.BYTE 

0,13, 



5822 

*367*0 

176756 


.WORD 

176756 


I A A 1 1 

5823 

*3*772 

002 

002 

.BYTE 

2,2 



5824 

*36774 

172570 


.WORD 

172570 


I AFC1 1 

5825 

*36776 

0*2 

003 

.BYTE 

2,3 



5826 

*37000 

177400 


.WORD 

177400 


JRK11 

5827 

*37002 

002 

004 

.BYTE 

2,4 



5828 

*37004 

172410 


.WORD 

172410 


JDRll-P 

5829 

*37006 

002 

005 

.BYTE 

2,5 



5830 

*37010 

176770 


, WORD 

176770 


JAD0HD 

5831 

*37012 

002 

007 

.BYTE 

2,7 



5832 

*37014 

176720 


.WORD 

176720 


IRP11 

5833 

*37016 

0*2 

010 

.BYTE 

?,8. 



5834 

*37020 

172520 


, WORD 

172520 


JTM11 

5835 

*37022 

002 

013 

.BYTE 

?,11, 



5836 

*37024 

173000 


.WORD 

173000 


J M79?Y A 

5837 

*37026 

002 

014 

.BYTE 

2,12. 



5838 

*37030 

1731*0 


.WORD 

173100 


JM792YP 

5839 

*37032 

002 

015 

.BYTE 

2,13, 
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5840 **37034 000000 , WORD 0 

5641 000001 , END 
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PZQGAC', 

Pil SYMBOL 

table 






A 

03560? 

A ANSI 

035712 

A AR0 

036562 

A AP 1 

03656* 

AAR2 

036566 

AAR3 

036970 

AA11 

006566 

AA illy 

0001.40 

ABCA 

00^*74 

ABCSR 

001500 

ABOBR 

001*72 

ABWC 

001*76 

AC 

001224 

ACTF’LG 

001066 

AC0 

s%000000 

Aci 

8X000P01 

AC? 

a *4 000002 

AC3 

*% 000003 

AC4 

*X00000* 

AC5 

a%000005 

ADCK 

006*1? 

AOCQNT 

006516 

ADCSR 

001300 

AOCSRO 

001302 

ADOBR 

001274 

AOLQOP 

00643* 

AOSUB 

02*332 

adtbla 

006946 

A0T8LB 

006956 

ADTEMP 

006536 

AD01D 

00630* 

A 0 0 1 1. V 

000130 

AD0101 

035664 

ADI 

006342 

AD1000 

035670 

ADf001 

035666 

AD? 

00636? 

AD5T01 

036040 

AFADD 

005700 

AFCAR 

001430 

AFC I V 

000134 

AFCLK 

005776 

afcqm 

006056 

AFCOM1 

006100 

afcsr 

001424 

AFCTR1 

006236 

AFCTR2 

00623* 

A F C 1 1 

005670 

AF&BR 

001426 

AFFXA 

00602* 

AFEXIT 

006040 

afmqv 

006156 

AFMOV1 

006200 

afpflg 

006242 

AFPTR 

006232 

AFPTPA 

006234 

AFSEL 

00624? 

AFSP2 

005762 

AFTAPl 

00624* 

AFt A?2 

006264 

AFfEMP 

006240 

ANSI 

036070 

ANS2 

036072 

ANS3 

036074 

ANSA 

036076 

ANS5 

036100 

ANS6 

036102 

ANS7 

03610* 

ANS8 

036106 

ARIENQ 

0244J.0 

ASCNT 

035052 

ASH 

0012** 

ASHCl 

025*22 

ASHC2 

026014 

ASH1 

025604 

ASH2 

025666 

B 

03567? 

BBCA 

001504 

9BCSR 

001510 

RBDBP 

001502 

BBWC 

001606 

RDATA1 

004510 

BDATA2 

004540 

PEG INI 

00154? 

BE6IN4 

002306 

BELL 

03332* 

PR 

= 000002 

RUST! 

013*50 

BUSTS 

01406? 

BUSTS 

014144 

BUST4 

014516 

PUSWT 

a 033*10 

SUSY 

a 000020 

C 

035614 

CB8UF 

014240 

CBCA 

001514 

CBCSR 

001620 

cbcta 

014234 

CBCTB 

014236 

CBDBP 

001512 

CBUSi 

014072 

CBUS3 

01*176 

CBWC 

001516 

ODRA 

00127* 

CDfeUFF 

005424 

cocc 

001272 

CDCHKl 

005374 

ftDENDI 

a 005666 

COENDP 

a 005946 

CO ! SR 

005160 

CD ! SRI 

005200 

CDl.'OPl 

005262 

C0LQP2 

00531? 

CQRET 

005346 

CpRETl 

005352 

CDST 

001270 

CDfOP 

a 005*24 

CHAR 

006642 

CHARI 

00666* 

CHARS 

00670* 

CHARS 

006*30 

CHAR4 

007056 

CHOUT 

0065*0 

fTLlNCT 

012150 

CLBMUX 

a 002000 

CLBSCN 

* 004000 

CMP1 

023632 

CMP2 

023654 

CNFR 

03660? 

COMFIS 

02627* 

CQMFPP 

026532 

COMPAR 

023626 

NFlG 

00106? 

CQRTSB 

002236 

cqrtst 

002212 

COPTSl 

002254 

CRB1 

001264 

CRB2 

001266 

CRCHK1 

00*75* 

CRCHK2 

005102 

CR(5HK3 

005124 

CRCHK4 

005056 

CRCHK5 

005136 

&RCHK6 

\305072 

CR{JK1 

00515? 

CRCK2 

00515* 

CRCLCT 

005156 

CRCH11 

004714 

CRCNT 

005034 

CRCONT 

005022 

CRDRIV 

000230 

CRPRPS 

000232 

CRS 

00126? 

CRsyMj, 

0051*6 

CRSUR2 

005150 

CRi 

005010 

CURPAT 

012144 

D 

03563* 

DAC0 

001326 

PiACl 

001330 

OACTA 

035714 

DALTB 

035724 

daltc 

03573* 

PASH 

036950 

OAf A3 

004604 

DATA* 

004700 

dbbuf 

= 0142*0 

obca 

001524 

OBCSR 

001930 

OBCTA 

014602 

dbctb 

01*604 

obobr 

001922 

DB|G 

03567? 

CBUSI 

014452 

DBUS3 

01*5** 

DBWC 

001926 

DCCCMT 

01061* 

ocoati 

01063* 

HCOAT2 

010722 

HCDAT3 

010762 

DC0At4 

011050 

DC I NF 

0107*6 

DCIN1 

010726 

riclN? 

010732 

0C|N3 

010720 

DCIN3A 

01105* 

DCIN3B 

0110*6 

nc ! N4 a 

011060 

DQIN5 

010674 

OCIN9A 

01102* 

ocout 

0106*0 

Ocouta 

010766 

DCDUfF 

010*44 

PCOUT1 

01064* 

DC0UT3 

010772 

hCRBR 

001416 

DCRCSR 

001*10 

dcrqbr 

001*12 

DCRSR 

001*1* 

OCfCSA 

001420 

OQfCSR 

001*04 

dctoba 

001*22 

DCTDBR 

001406 

PiCiRtV 

000300 

BCITIV 

000304 

DCUR1 

01065* 

DC11R2 

011002 

ncliri 

010622 

0CI1T2 

010750 

BC2RJV 

000310 

OC2TIV 

00031* 

HEPI 

030774 

devtab 

036730 

DIV 

001236 

0 1 VI 

026110 

Ol V2 

026164 
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ozsgac; 

,PU SYMBOL 

table 








OmBAR 

00134? 

OmBARI 


011546 

ombas 


0013*6 

Ombat 

011500 

DM8CSR 

00193? 

ombend 


032*26 

OMRJNT 


032410 

fiMRLSR 

001534 

0M8LVL 

001947 

OMBRK 


001344 

ombvec 


001536 

DMCAT 

011*00 

DMfcSR 

0013*0 

DMMSK 


011540 

OMPRIA 


00*1*2 

OMPRtB 

004162 

OMPRIC 

00*202 

OMPRIM 


004022 

omptr 


01154* 

OMRINA 

011256 

DMRINB 

0U266 

OMRJNC 


011272 

WIND 


011322 

OMR I NX 

0113*6 

DMRPRT 

00135? 

wvec 


001350 

dmtdat 


0115*2 

0 M 1 1 n 

011122 

OMtlNA 

011154 

OMTJ NB 


011210 

omtinx 


011220 

MMtlNl 

0111*0 

OMfPRT 

001356 

dmtvec 


001354 

DMWCT 


011**0 

OMYRTI 

001032 

BMYRTS 

00103* 

DMZERO 


035702 

OMUBB 


032216 

PiMilP 

011226 

QMIlt 

01107? 

DNCSR 


001332 

ONEND 


031*30 

CNFLG 

031*5* 

ONfSR 

031*3? 

ONLVL 


001336 

ONVEC 


00133* 

nNIi 

031230 

DO 

« 000001 

DONE 

a 

000200 

OPESYN 


001372 

OPRB 

001362 

DPRDAT 

010616 

OpRJV 


00137* 

OPRP 


001376 

OPRS 

001360 

DP8SR 

01074? 

OPSS«l 


011070 

OPSYNC 


001370 

OPtB 

001366 

DPI DAT 

01062? 

OPT J V 


001*00 

np tp 


001*02 

opts 

00136* 

DPfSYN 

01061? 

DPUA 


003*1* 

OPUR 


010*62 

OPilRA 

010930 

DPI1RB 

01094? 

OP11RC 


01096* 

OPURR 


010570 

OPilT 

010374 

DRACCS 

001126 

ORACIS 


001132 

ORACOB 


001130 

Oract 

031*56 

ORACTI 

03166* 

ORACTO 


031666 

ORACTI 


031502 

0 RBA 

001*54 

BRBIV 

000124 

orbuf 


031170 

OROBR 


001*50 

ORENO 

031230 

ORINDA 

031154 

drflg 


03U66 

ORILVL 


001136 

Or I r 

03U60 

DRfVEC 

001134 

DRQLVL 


001142 

OROVEC 


001140 

PRST 

001452 

DRUG 

001*56 

DRUB 


031052 

OSMALL 


03565* 

OTCSRl 

001200 

OTREL 

033674 

00100 


036004 

D0100X 


036016 

00101 

035640 

D0I11 

03602* 

01000 


036006 

01001 


0356*6 

01010 

035636 

D20 

035774 

037 


03575* 

0*0 


0357** 

046 

035764 

D5t01 

036034 

ENOBOO 


030612 

ENDBUF 


010142 

enoeae 

030342 

CNBPAS 

033*1? 

r m n p A x 


033606 

ENDPA1 


03362* 

EN0P R 0 

027564 

EN5P1 

03392? 

EN0R2 


033536 

ENOWAT 


033116 

rwAlT 

035260 

EXIT 

033*5* 

FXJTCT 


03*3*2 

EXLOP 


02655* 

FXOPT 

034006 

EXPAND 

033142 

EXPAN1 


033156 

EXPAN2 


033162 

FXPAN3 

033300 

EXP1A 

01406? 

FX4 


026610 

E.PIJN 


000760 

F.TCSR 

a 000762 

E'.fQB 

a 000770 

E,0 


000636 

E 1 1 


000666 

F',2 

000700 

E',3 

000*36 

*,« 


000750 

r 

a 

000000 

f ADD 

a 075000 

FQTV 

a 0*5030 

FEA 


036112 

F EC 


036110 

FEND! 

012206 

FISSTK 

026930 

ryTERR 


036056 

FMUL 

a 

075020 

FPPERF 

036116 

PP8 

aX000000 

FPTAOR 


036120 

FPVECT 


036122 

FSUB 

a 075010 

PUNCH 

007940 

F5TQ1 


0360*2 

GETSH 


001020 

HCORE 

001056 

WQPNM 

HPL'PEX 

03504? 

HERE 

V 

000000 

HPCSR 


00111* 

HP0B9 

001116 

03472? 

HpOUTR 


00*622 

HPOUTi 


00*702 

HP0UT2 

004676 

HRBSR 

001110 

HRDBR 


001112 

MSP I V 


00007* 

MSPLSP 

034662 

HSRINR 

00495? 

HSRjNJ, 


00*610 

HSR I M2 


00*61* 

HSR IV 

000070 

htbstl 

033276 

H G°UNT 


001036 

IE 

a 

000100 

f MM I 

030712 

JNfCNT 

004712 

INTena 

a 

000100 

IOTLVL 


000022 

I0TVEC 

000020 

ISCNT 

035906 

isflg 


035510 

I SOL AT 


035320 

1S0LA1 

035362 

IS0LA2 

035360 

IS01 


035376 

IS02 


035*1* 

! S03 

035426 

JS04 

035*34 

IS05 


035*56 

ISWRO 


035512 

HDSAR0 

a 172360 

KDSDR0 

* 172327! 

KGBCC 


001*66 

KGCIT 


032012 

HGCP 

032056 

KGCSR 

001*64 

KGC12 


03201* 

KGDBP 


001*70 

RGPP 

032016 

X66N0 

032004 

KGIP 


032010 

KGSTRT 


031670 

RGTA 

031716 

KGfEST 

03170? 

KISAR0 

a 

1*23*0 

KJSOR0 

a 

172300 

KLiV 

000100 

kwbsb 

001**4 

KWCSR 


001**2 

KWCTR 


001**6 

RHIV 

000104 

KWRATE 

010350 

KWUU 


010352 

KW11P 


01021* 

RWi'lPA 

010262 
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PHOGAc'i 

Pfl SYMBOL 

table 






KWiiPB 

010304 

K4UPC 

010326 

LIGHTS 

s 177570 

I I *'K r R 

001^3” 

LIST 

335054 

LjSTNu 

03507” 

LKCSB 

00X120 

LLIMTT 

007542 

LOCO^E 

00X05? 

LOGJCA 

033506 

LPCSR 

00112? 

LPHBR 

001124 

LPfNTR 

01200? 

LPIN2 

012”74 

LPX 

012126 

rp? 

012134 

LP3 

01204? 

LP4 

012052 

UP? 

012120 

L S M 

001242 

LTESTl 

033?2 A 

LTESTX 

033236 

MAINLI 

004440 

M A t NS 

00444? 

ma|nt 

t 00X00? 

managx 

027030 

MAP 

034202 

M AP A 

034236 

MAPI 

03422” 

mapxa 

034204 

MAP2 

034246 

M A P 2 A 

034240 

MARK” 

0?5?4” 

M ARK0A 

025246 

MARK! 

s 006401 

MQRE 

026704 

MQ 

00X224 

MRUDB 

030950 

MRUD1 

030560 

M Ri 1^2 

030606 

MR11D3 

030AX* 

MTBC 

001436 

MTRKSP 

007650 

“TPKV 

007672 

MTC 

00X434 

MTCA 

00X440 

MTCK 

010000 

MTGK1 

010006 

MTCK2 

010044 

mtdata 

01007? 

MTIV 

000224 

mTL'EMG 

01021? 

MTPUl 

027054 

MTR8UF 

010074 

MTRDX 

007744 

m T p E A D 

007712 

MTRWX 

007^64 

*TR0 

010070 

MTR1 

007774 

MTR2 

007776 

MTS 

00X43? 

VTWUUF 

010144 

M TWR 1 T 

007566 

MTWRTX 

007620 

MUL 

00X234 

M UU 

025434 

MUL2 

0255x6 

M 7 9 2 A X 

03036? 

M792A2 

03042” 

M792A3 

030424 

M792A4 

030450 

M 7 9 2 A 5 

030452 

M79281 

030^14 

M792P2 

03054? 

M792P3 

030544 

M 792 V A 

03034? 

MT92VB 

030454 

M 

« 03X23O 

NQOPT 

034002 

''OR 

00124O 

nuha 

024404 

Ml 

036555 

nyPLAG 

00X026 

p 

036536 

PASCMT 

00X^4? 

PASCT 

034330 

PASEX 

034326 

PASPAR 

034324 

PASTAB 

03433? 

PAS20 

034320 

PAS40 

0343X0 

"AS 4 5 

034260 

PC 

■*000007 

PFAU 

0355X4 

PFFL AG 

03557O 

PJRLVL 

000242 

P JRQ 

* X?777? 

P J RQA 

027532 

P J RQB 

027536 

PJPQFX 

027540 

PIRVEC 

00024? 

PNTH 

036600 

POINTA 

006542 

P 0 ! N T B 

006544 

PREGi 

03494” 

PREG2 

034550 

PREG3 

034560 

PRFL AG 

00104O 

PRIME 

00X022 

PRINT 

034352 

PR JNT1 

034604 

PRINT2 

034624 

PRINT3 

034655 

PROCTS 

0X4606 

PRTAB 

034744 

prtari 

034756 

PS 

i 177776 

GVFUG 

= 00106? 

R 

= 004000 

P8 

s 000002 

RCBAR 

00X17? 

RCCSFi 

001174 

RCCSRH 

001176 

PCPA B 

001166 

RCOBP 

00X164 

RCFUNC 

007414 

PC IV 

000210 

PCI A 

001162 

rcstar 

007354 

RCWC 

001170 

RCWQRD 

0074X6 

RC11 

007314 

RC2 

00736? 

RO 

5 000004 

REC1A 

014056 

PEP 

s 024056 

REFF 

0?4”56 

REN13H 

01236? 

REN01 

012412 

REST AR 

03553? 

RESYNC 

0104^4 

RETURN 

001064 

RFCAR 

001154 

RFfSR 

0011.56 

rfcsrh 

00116” 

RFO 

003030 

RFDAE 

001144 

PFDA® 

001150 

RFbBR 

001146 

RFI V 

000204 

PFSTAR 

007502 

PFWC 

0”115? 

RF| 

007906 

RF11 

007420 

HJMP1 

016326 

PJMp? 

016344 

RKBAR 

00X21? 

RKCSR 

001214 

RKCSRH 

001216 

PKPAM 

0”1”06 

RKDAR 

00X204 

RKOBR 

00X20? 

RKDRV 

0OX?22 

PKP$P 

0O1?2O 

RKPUNC 

007204 

RKIV 

000?20 

RKSTAR 

007144 

*»KWC 

00121” 

rkword 

007205 

R41 

007152 

PKil 

007074 

potai.l 

02373? 

rotbe 

024074 

rotbo 

024200 

PQTEV'l 

024276 

PQTVAL 

033524 

rpbar 

00X3X6 

RPCA 

00X304 

RPCSR 

001320 

ppr-SPH 

001322 

rpd 

002*5” 

RPDAM 

00X306 

RPDAR 

001312 

ppnsp 

00131” 

RPFUMC 

0073X? 

RPIV 

000254 

RPSTAR 

007250 

ppwc 

001314 

RPIrfORD 

0073X0 

RP1 

007264 

PP.ll 

007210 

ptta 

025404 

RTTB 

0254X6 

RUNSW 

00234? 

. R0 

S*000”00 

PI 

8*00000! 

R2 

1*00000? 

R3 

8*000003 

R4 

8*000004 

P5 

s%05?0”05 

SAMADR 

03605? 

SAVPC 

034740 

S A VPS 

034742 

S A V R 2 

034726 

SAVR3 

03473” 

5AVR4 

034732 

SAVSPA 

034724 

PAVSTS 

036”54 

sc 

00123” 

SCNENA 

i 000040 

5CNT1 

03223 O 

SCNTlA 

032256 

SCNTiB 

03233” 

SCNT1D 

032370 

SCNT1E 

032404 

SCOPE 

s 104400 


GENERAL 
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D28GAC ,P11 SYMBOL 

table ' 





SC0PEA 

035166 

SCOPEB 035072 

SCOPEC 

035H6 

SCPPFF 

001060 

SC0PEG 

03516” 

SCOPET 035076 

SCSR 

00132 4 

S D S A R 0 

s 172260 

SDSDR0 a 

17222” 

SEGALL 034132 

SEGERR 

034152 

seglvl 

000252 

SEGOPT 

0340X4 

SEGVEC 000250 

SEG40 

034106 

SE-'D 1 A 

014054 

SETSU 

00215? 

SISAR0 s 172240 

SISDR0 

= 172200 

SI7EP 

036604 

SQBl 

025156 

S0B2 025154 

SQB3 

025166 

SQP4 

025176 

SQ85 

0?517? 

SQB6 025204 

SOLPAT 

012146 

PP 

8*000006 

SR a 

17757” 

SRE 001232 

SRI 

031044 

SR? 

001046 

SR3 

00X05” 

GSR0 a 177572 

SSR0T 

034200 

SSP3 

a 172516 

ST 

00235? 

STA 002452 

STACX 

036520 

STAckk 

036322 

START 

0O2O3? 

STC2 004272 

STC3 

034360 

STEP 

s 000400 

STMT 

003674 

STORE 036726 

ST”0 

00263* 

ST01 

002726 

STi 

00274* 

5T1B 003434 

STIC 

003466 

STIC! 

003504 

STiD 

0035x6 

ST1Q1 003540 

ST10 

003302 

ST10P 

004424 

STU 

00333? 

ST13 004272 

ST 17 

033362 

ST? 

002752 

ST3 

002764 

ST3B 003632 

ST4 

004360 

ST4A 

002776 

STS 

003014 

ST6 003062 

ST7 

003112 

STB 

003152 

ST9 

003234 

SUBR1A 035262 

SUBR2A 

03526 A 

SURR3A 

035270 

SU&R4A 

035276 

SUBR5A 035304 

SUBSPA 

035312 

«waba 

024770 

SWITCH 

0O216” 

TBPTR 006534 

TCBA 

001256 

TCCM 

001246 

TCRRV 

00X26” 

TCOT 001252 

TCEXPE 

012162 

TCFIBS 

012156 

tcflag 

01215? 

TCF1 012236 

TCF1A 

012230 

TCE2 

312270 

TCF3 

012304 

TCF4 012352 

TC1V 

000214 

TCLAST 

012160 

tcom 

02443? 

TCOM A 024412 

TC0M2 

024512 

TC0M3 

024574 

TCRBK 

012*64 

TCRBUF 012750 

TCRBt 

012722 

fC*l 

012524 

tcrxa 

012566 

TCR2 012574 

TCR3 

012610 

tCP4 

012656 

TCSR 

034736 

TCST 001250 

TCST AT 

012154 

tCWBK 

012436 

TCWBUF 

01275” 

TCWB1 012470 

TCWC 

001254 

tci 

035174 

TCfl 

012164 

TC2 035220 

TDBR 

034734 

TEMP 

035624 

TEST 

02406” 

TEST0 014626 

TEXT 

036522 

tjSRl 

023216 

TJSR2 

02322” 

T JSR3 02323? 

TM11 

007546 

TRCSP 

001100 

TROR 

00X10? 

TRTHET 034010 

TRTVEC 

= 000014 

tseoMB 

024652 

TSCOMi 

024646 

TSRT2A 024062 

TSTARI 

024314 

tS45 

025026 

TTCSR 

001104 

TTDBR 001106 

TTPIV 

000064 

TTPIV 

000060 

ttyinr 

004456 

TTVIMl 004514 

TTYIN2 

004520 

f TV I M3 

004506 

tumtab 

01160” 

TV19 010420 

TWAIT 

035244 

txu 

006634 

tyoutr 

004526 

TY0UT1 00454? 

TY0UT2 

004550 

fie 

010416 

T19 

01046” 

UOCR 001460 

uocn 

030612 

UDFLG 

031050 

UDINT 

03X026 

UOIV 000234 

UDPS 

000236 

0 D S A P 0 

b 177660 

UOSDR0 a 

17762” 

UQSR 001462 

UJSAR0 

a 177640 

U I SDP0 

s 177600 

UM s 

14000 ” 

WAITS 027602 

WAIT1 

027714 

WAIT? 

035020 

WAITS 

027646 

WAIT 4 027732 

WATCAB 

032544 

WAT C AD 

033052 

WATCAF 

033O06 

WATCBB 032560 

WATCCB 

032602 

WAfCOB 

032616 

WAT COM 

033H4 

WATCDP 033074 

watch 

032426 

watcml 

032*76 

WATCKP 

032522 

WATCRC 032720 

WATCRF 

032640 

watcpk 

033030 

WATCUD 

032676 

WATCU1 032662 

WATDC1 

032742 

WATDC2 

032764 

WAfl 

03250” 

WAT10 033O1O 

W A T 1 2 

033032 

W A T 1 3 

033”54 

WAT14 

033076 

WAU9 033116 

W AT 2 

032524 

WAT 3 

032962 

WAT4 

03262” 

WAT5 032642 

WAT6 

032700 

WAT 7 

032722 

WATS 

032744 

WAT9 032766 

WD 

s 000O14 

WE I RO 

035654 

WORDCT 

007544 

XQ 036543 

XLIST 

035012 

XQPl 

025042 

xpos 

036574 

XTCH 012360 

YPOS 

036572 

VPT 

036576 

DMPRT s 

00024” 

.DONE a 000200 

,60 

= 000001 

MA J MJ 

s 000004 

iNEX s 

040O0” 

.QVRUN s 020000 

.READY 

* 100000 

RlE 

s 000100 



GENERAL T EST PROGRAM ^ACYU',6?4 ;?4»QnT;73 2«»Z0 °AGE ilfi 
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GENERAL TEST PROGRAM MACYU',624 24wQCT; 73 20120 p AGE U9 

OlfiGAC'.PU 

teZQGAC.OHQGAS/SOL^OZQGAC'.PU 
RCJNuTIMP I 22 40 1 SECONDS 
C0RE USFDI 5< 





c 


c 



